autohotkey-v2.0/UltimateKEYS (for AutoHotkey v2.0).ahk

   1 ; UltimateKEYS (for AutoHotkey v2.0).ahk - 2022-10-22
   2
   3 ; Website :  www.ultimatekeys.info (pieter-degroote.github.io/UltimateKEYS/)
   4
   5 ; License :  GNU General Public License Version 3
   6
   7 ; GitHub :   github.com/pieter-degroote/UltimateKEYS
   8
   9
  10 ; Requirements :
  11
  12 ; Keyboard layout (on Windows) :  US QWERTY
  13
  14 ; AutoHotkey v2.0 (www.autohotkey.com)
  15
  16
  17
  18 ListLines False   ; omits recently executed lines from history (for privacy and security)
  19 KeyHistory 0      ; disables the key history (for privacy and security)
  20
  21 SendMode "Input"  ; optimizes for faster and more reliable input
  22
  23 global gEndKeys := "{bs}{del}{esc}{home}{end}"  ; ends dead key input on specific keys
  24
  25
  26 ; Compose :  Circumflex Accent (c)
  27
  28 global cmpCircumflex := Map()
  29 cmpCircumflex["a"] := "{u+00e2}"  ; (â) a with circumflex
  30 cmpCircumflex["A"] := "{u+00c2}"  ; (Â) A with circumflex
  31 cmpCircumflex["c"] := "{u+0109}"  ; (ĉ) c with circumflex
  32 cmpCircumflex["C"] := "{u+0108}"  ; (Ĉ) C with circumflex
  33 cmpCircumflex["e"] := "{u+00ea}"  ; (ê) e with circumflex
  34 cmpCircumflex["E"] := "{u+00ca}"  ; (Ê) E with circumflex
  35 cmpCircumflex["g"] := "{u+011d}"  ; (ĝ) g with circumflex
  36 cmpCircumflex["G"] := "{u+011c}"  ; (Ĝ) G with circumflex
  37 cmpCircumflex["h"] := "{u+0125}"  ; (ĥ) h with circumflex
  38 cmpCircumflex["H"] := "{u+0124}"  ; (Ĥ) H with circumflex
  39 cmpCircumflex["i"] := "{u+00ee}"  ; (î) i with circumflex
  40 cmpCircumflex["I"] := "{u+00ce}"  ; (Î) I with circumflex
  41 cmpCircumflex["j"] := "{u+0135}"  ; (ĵ) j with circumflex
  42 cmpCircumflex["J"] := "{u+0134}"  ; (Ĵ) J with circumflex
  43 cmpCircumflex["o"] := "{u+00f4}"  ; (ô) o with circumflex
  44 cmpCircumflex["O"] := "{u+00d4}"  ; (Ô) O with circumflex
  45 cmpCircumflex["s"] := "{u+015d}"  ; (ŝ) s with circumflex
  46 cmpCircumflex["S"] := "{u+015c}"  ; (Ŝ) S with circumflex
  47 cmpCircumflex["u"] := "{u+00fb}"  ; (û) u with circumflex
  48 cmpCircumflex["U"] := "{u+00db}"  ; (Û) U with circumflex
  49 cmpCircumflex["w"] := "{u+0175}"  ; (ŵ) w with circumflex
  50 cmpCircumflex["W"] := "{u+0174}"  ; (Ŵ) W with circumflex
  51 cmpCircumflex["y"] := "{u+0177}"  ; (ŷ) y with circumflex
  52 cmpCircumflex["Y"] := "{u+0176}"  ; (Ŷ) Y with circumflex
  53 cmpCircumflex["z"] := "{u+1e91}"  ; (ẑ) z with circumflex
  54 cmpCircumflex["Z"] := "{u+1e90}"  ; (Ẑ) Z with circumflex
  55 cmpCircumflex[" "] := "{u+02c6}"  ; (ˆ) circumflex accent (modifier)
  56
  57
  58 ; Compose :  Caron (v)
  59
  60 global cmpCaron := Map()
  61 cmpCaron["a"] := "{u+01ce}"  ; (ǎ) a with caron
  62 cmpCaron["A"] := "{u+01cd}"  ; (Ǎ) A with caron
  63 cmpCaron["c"] := "{u+010d}"  ; (č) c with caron
  64 cmpCaron["C"] := "{u+010c}"  ; (Č) C with caron
  65 cmpCaron["d"] := "{u+010f}"  ; (ď) d with caron
  66 cmpCaron["D"] := "{u+010e}"  ; (Ď) D with caron
  67 cmpCaron["e"] := "{u+011b}"  ; (ě) e with caron
  68 cmpCaron["E"] := "{u+011a}"  ; (Ě) E with caron
  69 cmpCaron["g"] := "{u+01e7}"  ; (ǧ) g with caron
  70 cmpCaron["G"] := "{u+01e6}"  ; (Ǧ) G with caron
  71 cmpCaron["h"] := "{u+021f}"  ; (ȟ) h with caron
  72 cmpCaron["H"] := "{u+021e}"  ; (Ȟ) H with caron
  73 cmpCaron["i"] := "{u+01d0}"  ; (ǐ) i with caron
  74 cmpCaron["I"] := "{u+01cf}"  ; (Ǐ) I with caron
  75 cmpCaron["j"] := "{u+01f0}"  ; (ǰ) j with caron
  76 cmpCaron["k"] := "{u+01e9}"  ; (ǩ) k with caron
  77 cmpCaron["K"] := "{u+01e8}"  ; (Ǩ) K with caron
  78 cmpCaron["l"] := "{u+013e}"  ; (ľ) l with caron
  79 cmpCaron["L"] := "{u+013d}"  ; (Ľ) L with caron
  80 cmpCaron["n"] := "{u+0148}"  ; (ň) n with caron
  81 cmpCaron["N"] := "{u+0147}"  ; (Ň) N with caron
  82 cmpCaron["o"] := "{u+01d2}"  ; (ǒ) o with caron
  83 cmpCaron["O"] := "{u+01d1}"  ; (Ǒ) O with caron
  84 cmpCaron["r"] := "{u+0159}"  ; (ř) r with caron
  85 cmpCaron["R"] := "{u+0158}"  ; (Ř) R with caron
  86 cmpCaron["s"] := "{u+0161}"  ; (š) s with caron
  87 cmpCaron["S"] := "{u+0160}"  ; (Š) S with caron
  88 cmpCaron["t"] := "{u+0165}"  ; (ť) t with caron
  89 cmpCaron["T"] := "{u+0164}"  ; (Ť) T with caron
  90 cmpCaron["u"] := "{u+01d4}"  ; (ǔ) u with caron
  91 cmpCaron["U"] := "{u+01d3}"  ; (Ǔ) U with caron
  92 cmpCaron["z"] := "{u+017e}"  ; (ž) z with caron
  93 cmpCaron["Z"] := "{u+017d}"  ; (Ž) Z with caron
  94 cmpCaron["3"] := "{u+01ef}"  ; (ǯ) small letter ezh with caron
  95 cmpCaron["#"] := "{u+01ee}"  ; (Ǯ) capital letter ezh with caron
  96 cmpCaron[" "] := "{u+02c7}"  ; (ˇ) caron
  97
  98
  99 ; Compose :  Dot Above (.)
 100
 101 global cmpDotAbove := Map()
 102 cmpDotAbove["a"] := "{u+0227}"  ; (ȧ) a with dot above
 103 cmpDotAbove["A"] := "{u+0226}"  ; (Ȧ) A with dot above
 104 cmpDotAbove["b"] := "{u+1e03}"  ; (ḃ) b with dot above
 105 cmpDotAbove["B"] := "{u+1e02}"  ; (Ḃ) B with dot above
 106 cmpDotAbove["c"] := "{u+010b}"  ; (ċ) c with dot above
 107 cmpDotAbove["C"] := "{u+010a}"  ; (Ċ) C with dot above
 108 cmpDotAbove["d"] := "{u+1e0b}"  ; (ḋ) d with dot above
 109 cmpDotAbove["D"] := "{u+1e0a}"  ; (Ḋ) D with dot above
 110 cmpDotAbove["e"] := "{u+0117}"  ; (ė) e with dot above
 111 cmpDotAbove["E"] := "{u+0116}"  ; (Ė) E with dot above
 112 cmpDotAbove["f"] := "{u+1e1f}"  ; (ḟ) f with dot above
 113 cmpDotAbove["F"] := "{u+1e1e}"  ; (Ḟ) F with dot above
 114 cmpDotAbove["g"] := "{u+0121}"  ; (ġ) g with dot above
 115 cmpDotAbove["G"] := "{u+0120}"  ; (Ġ) G with dot above
 116 cmpDotAbove["h"] := "{u+1e23}"  ; (ḣ) h with dot above
 117 cmpDotAbove["H"] := "{u+1e22}"  ; (Ḣ) H with dot above
 118 cmpDotAbove["i"] := "{u+0131}"  ; (ı) dotless i (Turkish, Azerbaijani)
 119 cmpDotAbove["I"] := "{u+0130}"  ; (İ) I with dot above (Turkish, Azerbaijani)
 120 cmpDotAbove["j"] := "{u+0237}"  ; (ȷ) dotless j
 121 cmpDotAbove["l"] := "{u+0140}"  ; (ŀ) l with middle dot
 122 cmpDotAbove["L"] := "{u+013f}"  ; (Ŀ) L with middle dot
 123 cmpDotAbove["m"] := "{u+1e41}"  ; (ṁ) m with dot above
 124 cmpDotAbove["M"] := "{u+1e40}"  ; (Ṁ) M with dot above
 125 cmpDotAbove["n"] := "{u+1e45}"  ; (ṅ) n with dot above
 126 cmpDotAbove["N"] := "{u+1e44}"  ; (Ṅ) N with dot above
 127 cmpDotAbove["o"] := "{u+022f}"  ; (ȯ) o with dot above
 128 cmpDotAbove["O"] := "{u+022e}"  ; (Ȯ) O with dot above
 129 cmpDotAbove["p"] := "{u+1e57}"  ; (ṗ) p with dot above
 130 cmpDotAbove["P"] := "{u+1e56}"  ; (Ṗ) P with dot above
 131 cmpDotAbove["r"] := "{u+1e59}"  ; (ṙ) r with dot above
 132 cmpDotAbove["R"] := "{u+1e58}"  ; (Ṙ) R with dot above
 133 cmpDotAbove["s"] := "{u+1e61}"  ; (ṡ) s with dot above
 134 cmpDotAbove["S"] := "{u+1e60}"  ; (Ṡ) S with dot above
 135 cmpDotAbove["t"] := "{u+1e6b}"  ; (ṫ) t with dot above
 136 cmpDotAbove["T"] := "{u+1e6a}"  ; (Ṫ) T with dot above
 137 cmpDotAbove["u"] := "{u+016f}"  ; (ů) u with ring above
 138 cmpDotAbove["U"] := "{u+016e}"  ; (Ů) U with ring above
 139 cmpDotAbove["w"] := "{u+1e87}"  ; (ẇ) w with dot above
 140 cmpDotAbove["W"] := "{u+1e86}"  ; (Ẇ) W with dot above
 141 cmpDotAbove["x"] := "{u+1e8b}"  ; (ẋ) x with dot above
 142 cmpDotAbove["X"] := "{u+1e8a}"  ; (Ẋ) X with dot above
 143 cmpDotAbove["y"] := "{u+1e8f}"  ; (ẏ) y with dot above
 144 cmpDotAbove["Y"] := "{u+1e8e}"  ; (Ẏ) Y with dot above
 145 cmpDotAbove["z"] := "{u+017c}"  ; (ż) z with dot above
 146 cmpDotAbove["Z"] := "{u+017b}"  ; (Ż) Z with dot above
 147
 148
 149 ; Compose :  Ring Above (o)
 150
 151 global cmpRingAbove := Map()
 152 cmpRingAbove["a"] := "{u+00e5}"  ; (å) a with ring above
 153 cmpRingAbove["A"] := "{u+00c5}"  ; (Å) A with ring above
 154 cmpRingAbove["u"] := "{u+016f}"  ; (ů) u with ring above
 155 cmpRingAbove["U"] := "{u+016e}"  ; (Ů) U with ring above
 156 cmpRingAbove["w"] := "{u+1e98}"  ; (ẘ) w with ring above
 157 cmpRingAbove["y"] := "{u+1e99}"  ; (ẙ) y with ring above
 158
 159
 160 ; Compose :  Macron/Stroke (-)
 161
 162 global cmpMacronStroke := Map()
 163 cmpMacronStroke["a"] := "{u+0101}"  ; (ā) a with macron
 164 cmpMacronStroke["A"] := "{u+0100}"  ; (Ā) A with macron
 165 cmpMacronStroke["b"] := "{u+0180}"  ; (ƀ) b with stroke
 166 cmpMacronStroke["B"] := "{u+0243}"  ; (Ƀ) B with stroke
 167 cmpMacronStroke["d"] := "{u+0111}"  ; (đ) d with stroke
 168 cmpMacronStroke["D"] := "{u+0110}"  ; (Đ) D with stroke
 169 cmpMacronStroke["e"] := "{u+0113}"  ; (ē) e with macron
 170 cmpMacronStroke["E"] := "{u+0112}"  ; (Ē) E with macron
 171 cmpMacronStroke["g"] := "{u+01e5}"  ; (ǥ) g with stroke (Skolt Sami)
 172 cmpMacronStroke["G"] := "{u+01e4}"  ; (Ǥ) G with stroke (Skolt Sami)
 173 cmpMacronStroke["h"] := "{u+0127}"  ; (ħ) h with stroke (Maltese)
 174 cmpMacronStroke["H"] := "{u+0126}"  ; (Ħ) H with stroke (Maltese)
 175 cmpMacronStroke["i"] := "{u+012b}"  ; (ī) i with macron
 176 cmpMacronStroke["I"] := "{u+012a}"  ; (Ī) I with macron
 177 cmpMacronStroke["j"] := "{u+0249}"  ; (ɉ) j with stroke
 178 cmpMacronStroke["J"] := "{u+0248}"  ; (Ɉ) J with stroke
 179 cmpMacronStroke["l"] := "{u+0142}"  ; (ł) l with stroke
 180 cmpMacronStroke["L"] := "{u+0141}"  ; (Ł) L with stroke
 181 cmpMacronStroke["o"] := "{u+014d}"  ; (ō) o with macron
 182 cmpMacronStroke["O"] := "{u+014c}"  ; (Ō) O with macron
 183 cmpMacronStroke["p"] := "{u+1d7d}"  ; (ᵽ) p with stroke
 184 cmpMacronStroke["P"] := "{u+2c63}"  ; (Ᵽ) P with stroke
 185 cmpMacronStroke["q"] := "{u+01ed}"  ; (ǭ) o with ogonek and macron
 186 cmpMacronStroke["Q"] := "{u+01ec}"  ; (Ǭ) O with ogonek and macron
 187 cmpMacronStroke["r"] := "{u+024d}"  ; (ɍ) r with stroke
 188 cmpMacronStroke["R"] := "{u+024c}"  ; (Ɍ) R with stroke
 189 cmpMacronStroke["t"] := "{u+0167}"  ; (ŧ) t with stroke
 190 cmpMacronStroke["T"] := "{u+0166}"  ; (Ŧ) T with stroke
 191 cmpMacronStroke["u"] := "{u+016b}"  ; (ū) u with macron
 192 cmpMacronStroke["U"] := "{u+016a}"  ; (Ū) U with macron
 193 cmpMacronStroke["y"] := "{u+0233}"  ; (ȳ) y with macron
 194 cmpMacronStroke["Y"] := "{u+0232}"  ; (Ȳ) Y with macron
 195 cmpMacronStroke["z"] := "{u+01b6}"  ; (ƶ) z with stroke
 196 cmpMacronStroke["Z"] := "{u+01b5}"  ; (Ƶ) Z with stroke
 197 cmpMacronStroke[" "] := "{u+00af}"  ; (¯) macron
 198
 199
 200 ; Compose :  Macron/Stroke (Additional) (_)
 201
 202 global cmpMacronStrokeAdd := Map()
 203 cmpMacronStrokeAdd["g"] := "{u+1e21}"  ; (ḡ) g with macron
 204 cmpMacronStrokeAdd["G"] := "{u+1e20}"  ; (Ḡ) G with macron
 205 cmpMacronStrokeAdd["i"] := "{u+0268}"  ; (ɨ) i with stroke
 206 cmpMacronStrokeAdd["I"] := "{u+0197}"  ; (Ɨ) I with stroke
 207 cmpMacronStrokeAdd["l"] := "{u+019a}"  ; (ƚ) l with bar
 208 cmpMacronStrokeAdd["L"] := "{u+023d}"  ; (Ƚ) L with bar
 209 cmpMacronStrokeAdd["u"] := "{u+0289}"  ; (ʉ) u with bar
 210 cmpMacronStrokeAdd["U"] := "{u+0244}"  ; (Ʉ) U with bar
 211 cmpMacronStrokeAdd["y"] := "{u+024f}"  ; (ɏ) y with stroke
 212 cmpMacronStrokeAdd["Y"] := "{u+024e}"  ; (Ɏ) Y with stroke
 213
 214
 215 ; Compose :  Oblique/Diagonal Stroke (/)
 216
 217 global cmpStroke := Map()
 218 cmpStroke["a"] := "{u+2c65}"  ; (ⱥ) a with stroke
 219 cmpStroke["A"] := "{u+023a}"  ; (Ⱥ) A with stroke
 220 cmpStroke["c"] := "{u+023c}"  ; (ȼ) c with stroke
 221 cmpStroke["C"] := "{u+023b}"  ; (Ȼ) C with stroke
 222 cmpStroke["e"] := "{u+0247}"  ; (ɇ) e with stroke
 223 cmpStroke["E"] := "{u+0246}"  ; (Ɇ) E with stroke
 224 cmpStroke["f"] := "{u+1e9c}"  ; (ẜ) long s with diagonal stroke
 225 cmpStroke["g"] := "{u+a7a1}"  ; (ꞡ) g with oblique stroke
 226 cmpStroke["G"] := "{u+a7a0}"  ; (Ꞡ) G with oblique stroke
 227 cmpStroke["k"] := "{u+a7a3}"  ; (ꞣ) k with oblique stroke
 228 cmpStroke["K"] := "{u+a7a2}"  ; (Ꞣ) K with oblique stroke
 229 cmpStroke["l"] := "{u+0142}"  ; (ł) l with stroke
 230 cmpStroke["L"] := "{u+0141}"  ; (Ł) L with stroke
 231 cmpStroke["n"] := "{u+a7a5}"  ; (ꞥ) n with oblique stroke
 232 cmpStroke["N"] := "{u+a7a4}"  ; (Ꞥ) N with oblique stroke
 233 cmpStroke["o"] := "{u+00f8}"  ; (ø) o with stroke
 234 cmpStroke["O"] := "{u+00d8}"  ; (Ø) O with stroke
 235 cmpStroke["r"] := "{u+a7a7}"  ; (ꞧ) r with oblique stroke
 236 cmpStroke["R"] := "{u+a7a6}"  ; (Ꞧ) R with oblique stroke
 237 cmpStroke["s"] := "{u+a7a9}"  ; (ꞩ) s with oblique stroke
 238 cmpStroke["S"] := "{u+a7a8}"  ; (Ꞩ) S with oblique stroke
 239 cmpStroke["t"] := "{u+2c66}"  ; (ⱦ) t with stroke
 240 cmpStroke["T"] := "{u+023e}"  ; (Ⱦ) T with stroke
 241
 242
 243 ; Compose :  Cedilla/Ogonek (,)
 244
 245 global cmpCedillaOgonek := Map()
 246 cmpCedillaOgonek["a"] := "{u+0105}"  ; (ą) a with ogonek
 247 cmpCedillaOgonek["A"] := "{u+0104}"  ; (Ą) A with ogonek
 248 cmpCedillaOgonek["c"] := "{u+00e7}"  ; (ç) c with cedilla
 249 cmpCedillaOgonek["C"] := "{u+00c7}"  ; (Ç) C with cedilla
 250 cmpCedillaOgonek["d"] := "{u+1e11}"  ; (ḑ) d with cedilla
 251 cmpCedillaOgonek["D"] := "{u+1e10}"  ; (Ḑ) D with cedilla
 252 cmpCedillaOgonek["e"] := "{u+0119}"  ; (ę) e with ogonek
 253 cmpCedillaOgonek["E"] := "{u+0118}"  ; (Ę) E with ogonek
 254 cmpCedillaOgonek["f"] := "{u+0229}"  ; (ȩ) e with cedilla
 255 cmpCedillaOgonek["F"] := "{u+0228}"  ; (Ȩ) E with cedilla
 256 cmpCedillaOgonek["g"] := "{u+0123}"  ; (ģ) g with cedilla
 257 cmpCedillaOgonek["G"] := "{u+0122}"  ; (Ģ) G with cedilla
 258 cmpCedillaOgonek["h"] := "{u+1e29}"  ; (ḩ) h with cedilla
 259 cmpCedillaOgonek["H"] := "{u+1e28}"  ; (Ḩ) H with cedilla
 260 cmpCedillaOgonek["i"] := "{u+012f}"  ; (į) i with ogonek
 261 cmpCedillaOgonek["I"] := "{u+012e}"  ; (Į) I with ogonek
 262 cmpCedillaOgonek["k"] := "{u+0137}"  ; (ķ) k with cedilla
 263 cmpCedillaOgonek["K"] := "{u+0136}"  ; (Ķ) K with cedilla
 264 cmpCedillaOgonek["l"] := "{u+013c}"  ; (ļ) l with cedilla
 265 cmpCedillaOgonek["L"] := "{u+013b}"  ; (Ļ) L with cedilla
 266 cmpCedillaOgonek["n"] := "{u+0146}"  ; (ņ) n with cedilla
 267 cmpCedillaOgonek["N"] := "{u+0145}"  ; (Ņ) N with cedilla
 268 cmpCedillaOgonek["o"] := "{u+01eb}"  ; (ǫ) o with ogonek
 269 cmpCedillaOgonek["O"] := "{u+01ea}"  ; (Ǫ) O with ogonek
 270 cmpCedillaOgonek["r"] := "{u+0157}"  ; (ŗ) r with cedilla
 271 cmpCedillaOgonek["R"] := "{u+0156}"  ; (Ŗ) R with cedilla
 272 cmpCedillaOgonek["s"] := "{u+015f}"  ; (ş) s with cedilla
 273 cmpCedillaOgonek["S"] := "{u+015e}"  ; (Ş) S with cedilla
 274 cmpCedillaOgonek["t"] := "{u+0163}"  ; (ţ) t with cedilla
 275 cmpCedillaOgonek["T"] := "{u+0162}"  ; (Ţ) T with cedilla
 276 cmpCedillaOgonek["u"] := "{u+0173}"  ; (ų) u with ogonek
 277 cmpCedillaOgonek["U"] := "{u+0172}"  ; (Ų) U with ogonek
 278 cmpCedillaOgonek["."] := "{u+02db}"  ; (˛) ogonek
 279 cmpCedillaOgonek[" "] := "{u+00b8}"  ; (¸) cedilla
 280
 281
 282 ; Compose :  Breve and Special Letters (b)
 283
 284 global cmpBreveSpecial := Map()
 285 cmpBreveSpecial["a"] := "{u+0103}"  ; (ă) a with breve
 286 cmpBreveSpecial["A"] := "{u+0102}"  ; (Ă) A with breve
 287 cmpBreveSpecial["d"] := "{u+0256}"  ; (ɖ) small letter d with tail
 288 cmpBreveSpecial["D"] := "{u+0189}"  ; (Ɖ) capital letter African D
 289 cmpBreveSpecial["e"] := "{u+0115}"  ; (ĕ) e with breve
 290 cmpBreveSpecial["E"] := "{u+0114}"  ; (Ĕ) E with breve
 291 cmpBreveSpecial["f"] := "{u+0259}"  ; (ə) small letter schwa (Azerbaijani)
 292 cmpBreveSpecial["F"] := "{u+018f}"  ; (Ə) capital letter schwa (Azerbaijani)
 293 cmpBreveSpecial["g"] := "{u+011f}"  ; (ğ) g with breve
 294 cmpBreveSpecial["G"] := "{u+011e}"  ; (Ğ) G with breve
 295 cmpBreveSpecial["i"] := "{u+012d}"  ; (ĭ) i with breve
 296 cmpBreveSpecial["I"] := "{u+012c}"  ; (Ĭ) I with breve
 297 cmpBreveSpecial["n"] := "{u+014b}"  ; (ŋ) small letter eng(ma)
 298 cmpBreveSpecial["N"] := "{u+014a}"  ; (Ŋ) capital letter eng(ma)
 299 cmpBreveSpecial["o"] := "{u+014f}"  ; (ŏ) o with breve
 300 cmpBreveSpecial["O"] := "{u+014e}"  ; (Ŏ) O with breve
 301 cmpBreveSpecial["s"] := "{u+0219}"  ; (ș) s with comma below (Romanian)
 302 cmpBreveSpecial["S"] := "{u+0218}"  ; (Ș) S with comma below (Romanian)
 303 cmpBreveSpecial["t"] := "{u+021b}"  ; (ț) t with comma below (Romanian)
 304 cmpBreveSpecial["T"] := "{u+021a}"  ; (Ț) T with comma below (Romanian)
 305 cmpBreveSpecial["u"] := "{u+016d}"  ; (ŭ) u with breve
 306 cmpBreveSpecial["U"] := "{u+016c}"  ; (Ŭ) U with breve
 307 cmpBreveSpecial["w"] := "{u+01bf}"  ; (ƿ) small letter wynn
 308 cmpBreveSpecial["W"] := "{u+01f7}"  ; (Ƿ) capital letter wynn
 309 cmpBreveSpecial["y"] := "{u+021d}"  ; (ȝ) small letter yogh
 310 cmpBreveSpecial["Y"] := "{u+021c}"  ; (Ȝ) capital letter yogh
 311 cmpBreveSpecial["3"] := "{u+0292}"  ; (ʒ) small letter ezh
 312 cmpBreveSpecial["#"] := "{u+01b7}"  ; (Ʒ) capital letter ezh
 313 cmpBreveSpecial[" "] := "{u+02d8}"  ; (˘) breve
 314
 315
 316 ; Compose :  Inverted Breve (B)
 317
 318 global cmpInvertedBreve := Map()
 319 cmpInvertedBreve["a"] := "{u+0203}"  ; (ȃ) a with inverted breve
 320 cmpInvertedBreve["A"] := "{u+0202}"  ; (Ȃ) A with inverted breve
 321 cmpInvertedBreve["e"] := "{u+0207}"  ; (ȇ) e with inverted breve
 322 cmpInvertedBreve["E"] := "{u+0206}"  ; (Ȇ) E with inverted breve
 323 cmpInvertedBreve["i"] := "{u+020b}"  ; (ȋ) i with inverted breve
 324 cmpInvertedBreve["I"] := "{u+020a}"  ; (Ȋ) I with inverted breve
 325 cmpInvertedBreve["o"] := "{u+020f}"  ; (ȏ) o with inverted breve
 326 cmpInvertedBreve["O"] := "{u+020e}"  ; (Ȏ) O with inverted breve
 327 cmpInvertedBreve["r"] := "{u+0213}"  ; (ȓ) r with inverted breve
 328 cmpInvertedBreve["R"] := "{u+0212}"  ; (Ȓ) R with inverted breve
 329 cmpInvertedBreve["u"] := "{u+0217}"  ; (ȗ) u with inverted breve
 330 cmpInvertedBreve["U"] := "{u+0216}"  ; (Ȗ) U with inverted breve
 331
 332
 333 ; Compose :  Acute Accent (')
 334
 335 global cmpAcuteAccent := Map()
 336 cmpAcuteAccent["a"] := "{u+00e1}"  ; (á) a with acute
 337 cmpAcuteAccent["A"] := "{u+00c1}"  ; (Á) A with acute
 338 cmpAcuteAccent["c"] := "{u+0107}"  ; (ć) c with acute
 339 cmpAcuteAccent["C"] := "{u+0106}"  ; (Ć) C with acute
 340 cmpAcuteAccent["e"] := "{u+00e9}"  ; (é) e with acute
 341 cmpAcuteAccent["E"] := "{u+00c9}"  ; (É) E with acute
 342 cmpAcuteAccent["g"] := "{u+01f5}"  ; (ǵ) g with acute
 343 cmpAcuteAccent["G"] := "{u+01f4}"  ; (Ǵ) G with acute
 344 cmpAcuteAccent["i"] := "{u+00ed}"  ; (í) i with acute
 345 cmpAcuteAccent["I"] := "{u+00cd}"  ; (Í) I with acute
 346 cmpAcuteAccent["k"] := "{u+1e31}"  ; (ḱ) k with acute
 347 cmpAcuteAccent["K"] := "{u+1e30}"  ; (Ḱ) K with acute
 348 cmpAcuteAccent["l"] := "{u+013a}"  ; (ĺ) l with acute
 349 cmpAcuteAccent["L"] := "{u+0139}"  ; (Ĺ) L with acute
 350 cmpAcuteAccent["m"] := "{u+1e3f}"  ; (ḿ) m with acute
 351 cmpAcuteAccent["M"] := "{u+1e3e}"  ; (Ḿ) M with acute
 352 cmpAcuteAccent["n"] := "{u+0144}"  ; (ń) n with acute
 353 cmpAcuteAccent["N"] := "{u+0143}"  ; (Ń) N with acute
 354 cmpAcuteAccent["o"] := "{u+00f3}"  ; (ó) o with acute
 355 cmpAcuteAccent["O"] := "{u+00d3}"  ; (Ó) O with acute
 356 cmpAcuteAccent["p"] := "{u+1e55}"  ; (ṕ) p with acute
 357 cmpAcuteAccent["P"] := "{u+1e54}"  ; (Ṕ) P with acute
 358 cmpAcuteAccent["r"] := "{u+0155}"  ; (ŕ) r with acute
 359 cmpAcuteAccent["R"] := "{u+0154}"  ; (Ŕ) R with acute
 360 cmpAcuteAccent["s"] := "{u+015b}"  ; (ś) s with acute
 361 cmpAcuteAccent["S"] := "{u+015a}"  ; (Ś) S with acute
 362 cmpAcuteAccent["u"] := "{u+00fa}"  ; (ú) u with acute
 363 cmpAcuteAccent["U"] := "{u+00da}"  ; (Ú) U with acute
 364 cmpAcuteAccent["w"] := "{u+1e83}"  ; (ẃ) w with acute
 365 cmpAcuteAccent["W"] := "{u+1e82}"  ; (Ẃ) W with acute
 366 cmpAcuteAccent["y"] := "{u+00fd}"  ; (ý) y with acute
 367 cmpAcuteAccent["Y"] := "{u+00dd}"  ; (Ý) Y with acute
 368 cmpAcuteAccent["z"] := "{u+017a}"  ; (ź) z with acute
 369 cmpAcuteAccent["Z"] := "{u+0179}"  ; (Ź) Z with acute
 370 cmpAcuteAccent[" "] := "{u+00b4}"  ; (´) acute accent
 371
 372
 373 ; Compose :  Diaeresis (")
 374
 375 global cmpDiaeresis := Map()
 376 cmpDiaeresis["a"] := "{u+00e4}"  ; (ä) a with diaeresis
 377 cmpDiaeresis["A"] := "{u+00c4}"  ; (Ä) A with diaeresis
 378 cmpDiaeresis["e"] := "{u+00eb}"  ; (ë) e with diaeresis
 379 cmpDiaeresis["E"] := "{u+00cb}"  ; (Ë) E with diaeresis
 380 cmpDiaeresis["h"] := "{u+1e27}"  ; (ḧ) h with diaeresis
 381 cmpDiaeresis["H"] := "{u+1e26}"  ; (Ḧ) H with diaeresis
 382 cmpDiaeresis["i"] := "{u+00ef}"  ; (ï) i with diaeresis
 383 cmpDiaeresis["I"] := "{u+00cf}"  ; (Ï) I with diaeresis
 384 cmpDiaeresis["o"] := "{u+00f6}"  ; (ö) o with diaeresis
 385 cmpDiaeresis["O"] := "{u+00d6}"  ; (Ö) O with diaeresis
 386 cmpDiaeresis["t"] := "{u+1e97}"  ; (ẗ) t with diaeresis
 387 cmpDiaeresis["u"] := "{u+00fc}"  ; (ü) u with diaeresis
 388 cmpDiaeresis["U"] := "{u+00dc}"  ; (Ü) U with diaeresis
 389 cmpDiaeresis["w"] := "{u+1e85}"  ; (ẅ) w with diaeresis
 390 cmpDiaeresis["W"] := "{u+1e84}"  ; (Ẅ) W with diaeresis
 391 cmpDiaeresis["x"] := "{u+1e8d}"  ; (ẍ) x with diaeresis
 392 cmpDiaeresis["X"] := "{u+1e8c}"  ; (Ẍ) X with diaeresis
 393 cmpDiaeresis["y"] := "{u+00ff}"  ; (ÿ) y with diaeresis
 394 cmpDiaeresis["Y"] := "{u+0178}"  ; (Ÿ) Y with diaeresis
 395 cmpDiaeresis[" "] := "{u+00a8}"  ; (¨) diaeresis
 396
 397
 398 ; Compose :  Double Acute Accent (=)
 399
 400 global cmpDoubleAcute := Map()
 401 cmpDoubleAcute["o"] := "{u+0151}"  ; (ő) o with double acute
 402 cmpDoubleAcute["O"] := "{u+0150}"  ; (Ő) O with double acute
 403 cmpDoubleAcute["u"] := "{u+0171}"  ; (ű) u with double acute
 404 cmpDoubleAcute["U"] := "{u+0170}"  ; (Ű) U with double acute
 405 cmpDoubleAcute[" "] := "{u+02dd}"  ; (˝) double acute accent
 406
 407
 408 ; Compose :  Grave Accent (`)
 409
 410 global cmpGraveAccent := Map()
 411 cmpGraveAccent["a"] := "{u+00e0}"  ; (à) a with grave
 412 cmpGraveAccent["A"] := "{u+00c0}"  ; (À) A with grave
 413 cmpGraveAccent["e"] := "{u+00e8}"  ; (è) e with grave
 414 cmpGraveAccent["E"] := "{u+00c8}"  ; (È) E with grave
 415 cmpGraveAccent["i"] := "{u+00ec}"  ; (ì) i with grave
 416 cmpGraveAccent["I"] := "{u+00cc}"  ; (Ì) I with grave
 417 cmpGraveAccent["n"] := "{u+01f9}"  ; (ǹ) n with grave
 418 cmpGraveAccent["N"] := "{u+01f8}"  ; (Ǹ) N with grave
 419 cmpGraveAccent["o"] := "{u+00f2}"  ; (ò) o with grave
 420 cmpGraveAccent["O"] := "{u+00d2}"  ; (Ò) O with grave
 421 cmpGraveAccent["u"] := "{u+00f9}"  ; (ù) u with grave
 422 cmpGraveAccent["U"] := "{u+00d9}"  ; (Ù) U with grave
 423 cmpGraveAccent["w"] := "{u+1e81}"  ; (ẁ) w with grave
 424 cmpGraveAccent["W"] := "{u+1e80}"  ; (Ẁ) W with grave
 425 cmpGraveAccent["y"] := "{u+1ef3}"  ; (ỳ) y with grave
 426 cmpGraveAccent["Y"] := "{u+1ef2}"  ; (Ỳ) Y with grave
 427 cmpGraveAccent[" "] := "{u+02cb}"  ; (ˋ) grave accent (modifier)
 428
 429
 430 ; Compose :  Double Grave Accent (G)
 431
 432 global cmpDoubleGrave := Map()
 433 cmpDoubleGrave["a"] := "{u+0201}"  ; (ȁ) a with double grave
 434 cmpDoubleGrave["A"] := "{u+0200}"  ; (Ȁ) A with double grave
 435 cmpDoubleGrave["e"] := "{u+0205}"  ; (ȅ) e with double grave
 436 cmpDoubleGrave["E"] := "{u+0204}"  ; (Ȅ) E with double grave
 437 cmpDoubleGrave["i"] := "{u+0209}"  ; (ȉ) i with double grave
 438 cmpDoubleGrave["I"] := "{u+0208}"  ; (Ȉ) I with double grave
 439 cmpDoubleGrave["o"] := "{u+020d}"  ; (ȍ) o with double grave
 440 cmpDoubleGrave["O"] := "{u+020c}"  ; (Ȍ) O with double grave
 441 cmpDoubleGrave["r"] := "{u+0211}"  ; (ȑ) r with double grave
 442 cmpDoubleGrave["R"] := "{u+0210}"  ; (Ȑ) R with double grave
 443 cmpDoubleGrave["u"] := "{u+0215}"  ; (ȕ) u with double grave
 444 cmpDoubleGrave["U"] := "{u+0214}"  ; (Ȕ) U with double grave
 445
 446
 447 ; Compose :  Tilde (~)
 448
 449 global cmpTilde := Map()
 450 cmpTilde["a"] := "{u+00e3}"  ; (ã) a with tilde
 451 cmpTilde["A"] := "{u+00c3}"  ; (Ã) A with tilde
 452 cmpTilde["e"] := "{u+1ebd}"  ; (ẽ) e with tilde
 453 cmpTilde["E"] := "{u+1ebc}"  ; (Ẽ) E with tilde
 454 cmpTilde["i"] := "{u+0129}"  ; (ĩ) i with tilde
 455 cmpTilde["I"] := "{u+0128}"  ; (Ĩ) I with tilde
 456 cmpTilde["l"] := "{u+026b}"  ; (ɫ) l with middle tilde
 457 cmpTilde["L"] := "{u+2c62}"  ; (Ɫ) L with middle tilde
 458 cmpTilde["n"] := "{u+00f1}"  ; (ñ) n with tilde
 459 cmpTilde["N"] := "{u+00d1}"  ; (Ñ) N with tilde
 460 cmpTilde["o"] := "{u+00f5}"  ; (õ) o with tilde
 461 cmpTilde["O"] := "{u+00d5}"  ; (Õ) O with tilde
 462 cmpTilde["u"] := "{u+0169}"  ; (ũ) u with tilde
 463 cmpTilde["U"] := "{u+0168}"  ; (Ũ) U with tilde
 464 cmpTilde["v"] := "{u+1e7d}"  ; (ṽ) v with tilde
 465 cmpTilde["V"] := "{u+1e7c}"  ; (Ṽ) V with tilde
 466 cmpTilde["y"] := "{u+1ef9}"  ; (ỹ) y with tilde
 467 cmpTilde["Y"] := "{u+1ef8}"  ; (Ỹ) Y with tilde
 468 cmpTilde[" "] := "{u+02dc}"  ; (˜) small tilde
 469
 470
 471 ; Compose :  Hook and Horn (h)
 472
 473 global cmpHook := Map()
 474 cmpHook["b"] := "{u+0253}"  ; (ɓ) b with hook
 475 cmpHook["B"] := "{u+0181}"  ; (Ɓ) B with hook
 476 cmpHook["c"] := "{u+0188}"  ; (ƈ) c with hook
 477 cmpHook["C"] := "{u+0187}"  ; (Ƈ) C with hook
 478 cmpHook["d"] := "{u+0257}"  ; (ɗ) d with hook
 479 cmpHook["D"] := "{u+018a}"  ; (Ɗ) D with hook
 480 cmpHook["f"] := "{u+0192}"  ; (ƒ) f with hook
 481 cmpHook["F"] := "{u+0191}"  ; (Ƒ) F with hook
 482 cmpHook["g"] := "{u+0260}"  ; (ɠ) g with hook
 483 cmpHook["G"] := "{u+0193}"  ; (Ɠ) G with hook
 484 cmpHook["h"] := "{u+0266}"  ; (ɦ) h with hook
 485 cmpHook["H"] := "{u+a7aa}"  ; (Ɦ) H with hook
 486 cmpHook["j"] := "{u+0267}"  ; (ɧ) small letter heng with hook
 487 cmpHook["k"] := "{u+0199}"  ; (ƙ) k with hook
 488 cmpHook["K"] := "{u+0198}"  ; (Ƙ) K with hook
 489 cmpHook["m"] := "{u+0271}"  ; (ɱ) m with hook
 490 cmpHook["M"] := "{u+2c6e}"  ; (Ɱ) M with hook
 491 cmpHook["n"] := "{u+0272}"  ; (ɲ) n with left hook
 492 cmpHook["N"] := "{u+019d}"  ; (Ɲ) N with left hook
 493 cmpHook["o"] := "{u+01a1}"  ; (ơ) o with horn
 494 cmpHook["O"] := "{u+01a0}"  ; (Ơ) O with horn
 495 cmpHook["p"] := "{u+01a5}"  ; (ƥ) p with hook
 496 cmpHook["P"] := "{u+01a4}"  ; (Ƥ) P with hook
 497 cmpHook["q"] := "{u+024b}"  ; (ɋ) q with hook tail
 498 cmpHook["Q"] := "{u+024a}"  ; (Ɋ) Q with hook tail
 499 cmpHook["r"] := "{u+027d}"  ; (ɽ) r with tail
 500 cmpHook["R"] := "{u+2c64}"  ; (Ɽ) R with tail
 501 cmpHook["t"] := "{u+01ad}"  ; (ƭ) t with hook
 502 cmpHook["T"] := "{u+01ac}"  ; (Ƭ) T with hook
 503 cmpHook["u"] := "{u+01b0}"  ; (ư) u with horn
 504 cmpHook["U"] := "{u+01af}"  ; (Ư) U with horn
 505 cmpHook["v"] := "{u+028b}"  ; (ʋ) v with hook
 506 cmpHook["V"] := "{u+01b2}"  ; (Ʋ) V with hook
 507 cmpHook["w"] := "{u+2c73}"  ; (ⱳ) w with hook
 508 cmpHook["W"] := "{u+2c72}"  ; (Ⱳ) W with hook
 509 cmpHook["y"] := "{u+01b4}"  ; (ƴ) y with hook
 510 cmpHook["Y"] := "{u+01b3}"  ; (Ƴ) Y with hook
 511 cmpHook["z"] := "{u+0225}"  ; (ȥ) z with hook
 512 cmpHook["Z"] := "{u+0224}"  ; (Ȥ) Z with hook
 513
 514
 515 ; Compose :  Latin Greek Letters and Variations (l)
 516
 517 global cmpLatinGreek := Map()
 518 cmpLatinGreek["a"] := "{u+0251}"  ; (ɑ) Latin small letter alpha
 519 cmpLatinGreek["A"] := "{u+2c6d}"  ; (Ɑ) Latin capital letter alpha
 520 cmpLatinGreek["c"] := "{u+ab36}"  ; (ꬶ) small letter script g with crossed-tail
 521 cmpLatinGreek["e"] := "{u+025b}"  ; (ɛ) small letter open e (Latin small epsilon)
 522 cmpLatinGreek["E"] := "{u+0190}"  ; (Ɛ) capital letter open E (Latin capital epsilon)
 523 cmpLatinGreek["f"] := "{u+017f}"  ; (ſ) small letter long s
 524 cmpLatinGreek["F"] := "{u+1e9b}"  ; (ẛ) long s with dot above
 525 cmpLatinGreek["g"] := "{u+0263}"  ; (ɣ) Latin small letter gamma
 526 cmpLatinGreek["G"] := "{u+0194}"  ; (Ɣ) Latin capital letter gamma
 527 cmpLatinGreek["h"] := "{u+a727}"  ; (ꜧ) small letter heng
 528 cmpLatinGreek["H"] := "{u+a726}"  ; (Ꜧ) capital letter heng
 529 cmpLatinGreek["i"] := "{u+0269}"  ; (ɩ) Latin small letter iota
 530 cmpLatinGreek["I"] := "{u+0196}"  ; (Ɩ) Latin capital letter iota
 531 cmpLatinGreek["k"] := "{u+0138}"  ; (ĸ) small letter kra
 532 cmpLatinGreek["o"] := "{u+0254}"  ; (ɔ) small letter open o
 533 cmpLatinGreek["O"] := "{u+0186}"  ; (Ɔ) capital letter open O
 534 cmpLatinGreek["s"] := "{u+0283}"  ; (ʃ) small letter esh
 535 cmpLatinGreek["S"] := "{u+01a9}"  ; (Ʃ) capital letter esh
 536 cmpLatinGreek["u"] := "{u+028a}"  ; (ʊ) Latin small letter upsilon
 537 cmpLatinGreek["U"] := "{u+01b1}"  ; (Ʊ) Latin capital letter upsilon
 538
 539
 540 ; Compose :  Turned Letters (t)
 541
 542 global cmpTurned := Map()
 543 cmpTurned["a"] := "{u+0250}"  ; (ɐ) Latin small letter turned a
 544 cmpTurned["A"] := "{u+2c6f}"  ; (Ɐ) Latin capital letter turned A
 545 cmpTurned["e"] := "{u+01dd}"  ; (ǝ) Latin small letter turned e
 546 cmpTurned["E"] := "{u+018e}"  ; (Ǝ) Latin capital letter reversed E
 547 cmpTurned["q"] := "{u+0252}"  ; (ɒ) Latin small letter turned alpha
 548 cmpTurned["Q"] := "{u+2c70}"  ; (Ɒ) Latin capital letter turned alpha
 549 cmpTurned["v"] := "{u+028c}"  ; (ʌ) Latin small letter turned v
 550 cmpTurned["V"] := "{u+0245}"  ; (Ʌ) Latin capital letter turned V
 551 cmpTurned["y"] := "{u+028e}"  ; (ʎ) Latin small letter turned y
 552
 553
 554 ; Compose :  Currency Symbols ($)
 555
 556 global cmpCurrency := Map()
 557 cmpCurrency["a"] := "{u+058f}"  ; (֏) Armenian dram
 558 cmpCurrency["A"] := "{u+20b3}"  ; (₳) Argentine austral
 559 cmpCurrency["b"] := "{u+20bf}"  ; (₿) bitcoin
 560 cmpCurrency["B"] := "{u+0e3f}"  ; (฿) Thai baht
 561 cmpCurrency["c"] := "{u+20a1}"  ; (₡) Costa Rican colón
 562 cmpCurrency["C"] := "{u+20b5}"  ; (₵) Ghanaian cedi
 563 cmpCurrency["d"] := "{u+20ab}"  ; (₫) Vietnamese dong
 564 cmpCurrency["D"] := "{u+20af}"  ; (₯) Greek drachma
 565 cmpCurrency["e"] := "{u+20ac}"  ; (€) euro sign
 566 cmpCurrency["E"] := "{u+20a0}"  ; (₠) euro-currency sign
 567 cmpCurrency["f"] := "{u+20a3}"  ; (₣) French franc
 568 cmpCurrency["F"] := "{u+20a3}"  ; (₣) French franc
 569 cmpCurrency["g"] := "{u+20b2}"  ; (₲) Paraguayan guaraní
 570 cmpCurrency["G"] := "{u+20be}"  ; (₾) Georgian lari
 571 cmpCurrency["h"] := "{u+20b4}"  ; (₴) Ukrainian hryvnia
 572 cmpCurrency["H"] := "{u+20b4}"  ; (₴) Ukrainian hryvnia
 573 cmpCurrency["i"] := "{u+20a4}"  ; (₤) lira
 574 cmpCurrency["I"] := "{u+20b6}"  ; (₶) livre tournois
 575 cmpCurrency["k"] := "{u+20ad}"  ; (₭) Laotian kip
 576 cmpCurrency["K"] := "{u+20ad}"  ; (₭) Laotian kip
 577 cmpCurrency["l"] := "{u+20ba}"  ; (₺) Turkish lira
 578 cmpCurrency["L"] := "{u+00a3}"  ; (£) pound sign
 579 cmpCurrency["m"] := "{u+20bc}"  ; (₼) Azerbaijani manat
 580 cmpCurrency["M"] := "{u+20a5}"  ; (₥) mill sign
 581 cmpCurrency["n"] := "{u+20a6}"  ; (₦) Nigerian naira
 582 cmpCurrency["N"] := "{u+20bb}"  ; (₻) Nordic mark
 583 cmpCurrency["o"] := "{u+00a2}"  ; (¢) cent sign (dollar)
 584 cmpCurrency["p"] := "{u+20b1}"  ; (₱) Philippine peso
 585 cmpCurrency["P"] := "{u+20a7}"  ; (₧) Spanish pesetas
 586 cmpCurrency["r"] := "{u+20b9}"  ; (₹) Indian rupee
 587 cmpCurrency["R"] := "{u+20bd}"  ; (₽) Russian ruble
 588 cmpCurrency["s"] := "{u+20aa}"  ; (₪) Israeli new shekel
 589 cmpCurrency["S"] := "{u+20b7}"  ; (₷) spesmilo
 590 cmpCurrency["t"] := "{u+20ae}"  ; (₮) Mongolian tögrög (tugrik)
 591 cmpCurrency["T"] := "{u+20b8}"  ; (₸) Kazakh tenge
 592 cmpCurrency["u"] := "{u+20a8}"  ; (₨) rupee sign
 593 cmpCurrency["U"] := "{u+20a2}"  ; (₢) Brazilian cruzeiro
 594 cmpCurrency["w"] := "{u+20a9}"  ; (₩) South Korean won
 595 cmpCurrency["W"] := "{u+20a9}"  ; (₩) South Korean won
 596 cmpCurrency["x"] := "{u+00a4}"  ; (¤) currency sign
 597 cmpCurrency["y"] := "{u+00a5}"  ; (¥) yen sign
 598 cmpCurrency["Y"] := "{u+00a5}"  ; (¥) yen sign
 599 cmpCurrency[" "] := "{u+00a4}"  ; (¤) currency sign
 600
 601
 602 ; Compose :  Greek Alphabet (g)
 603
 604 global cmpGreek := Map()
 605 cmpGreek["a"] := "{u+03b1}"  ; (α) Greek small alpha
 606 cmpGreek["A"] := "{u+0391}"  ; (Α) Greek capital alpha
 607 cmpGreek["b"] := "{u+03b2}"  ; (β) Greek small beta
 608 cmpGreek["B"] := "{u+0392}"  ; (Β) Greek capital beta
 609 cmpGreek["v"] := "{u+03b2}"  ; (β) Greek small beta
 610 cmpGreek["V"] := "{u+0392}"  ; (Β) Greek capital beta
 611 cmpGreek["g"] := "{u+03b3}"  ; (γ) Greek small gamma
 612 cmpGreek["G"] := "{u+0393}"  ; (Γ) Greek capital gamma
 613 cmpGreek["d"] := "{u+03b4}"  ; (δ) Greek small delta
 614 cmpGreek["D"] := "{u+0394}"  ; (Δ) Greek capital delta
 615 cmpGreek["e"] := "{u+03b5}"  ; (ε) Greek small epsilon
 616 cmpGreek["E"] := "{u+0395}"  ; (Ε) Greek capital epsilon
 617 cmpGreek["z"] := "{u+03b6}"  ; (ζ) Greek small zeta
 618 cmpGreek["Z"] := "{u+0396}"  ; (Ζ) Greek capital zeta
 619 cmpGreek["h"] := "{u+03b7}"  ; (η) Greek small eta
 620 cmpGreek["H"] := "{u+0397}"  ; (Η) Greek capital eta
 621 cmpGreek["j"] := "{u+03b8}"  ; (θ) Greek small theta
 622 cmpGreek["J"] := "{u+0398}"  ; (Θ) Greek capital theta
 623 cmpGreek["i"] := "{u+03b9}"  ; (ι) Greek small iota
 624 cmpGreek["I"] := "{u+0399}"  ; (Ι) Greek capital iota
 625 cmpGreek["k"] := "{u+03ba}"  ; (κ) Greek small kappa
 626 cmpGreek["K"] := "{u+039a}"  ; (Κ) Greek capital kappa
 627 cmpGreek["l"] := "{u+03bb}"  ; (λ) Greek small lambda
 628 cmpGreek["L"] := "{u+039b}"  ; (Λ) Greek capital lambda
 629 cmpGreek["m"] := "{u+03bc}"  ; (μ) Greek small mu
 630 cmpGreek["M"] := "{u+039c}"  ; (Μ) Greek capital mu
 631 cmpGreek["n"] := "{u+03bd}"  ; (ν) Greek small nu
 632 cmpGreek["N"] := "{u+039d}"  ; (Ν) Greek capital nu
 633 cmpGreek["x"] := "{u+03be}"  ; (ξ) Greek small xi
 634 cmpGreek["X"] := "{u+039e}"  ; (Ξ) Greek capital xi
 635 cmpGreek["o"] := "{u+03bf}"  ; (ο) Greek small omicron
 636 cmpGreek["O"] := "{u+039f}"  ; (Ο) Greek capital omicron
 637 cmpGreek["p"] := "{u+03c0}"  ; (π) Greek small pi
 638 cmpGreek["P"] := "{u+03a0}"  ; (Π) Greek capital pi
 639 cmpGreek["r"] := "{u+03c1}"  ; (ρ) Greek small rho
 640 cmpGreek["R"] := "{u+03a1}"  ; (Ρ) Greek capital rho
 641 cmpGreek["s"] := "{u+03c3}"  ; (σ) Greek small sigma
 642 cmpGreek["S"] := "{u+03a3}"  ; (Σ) Greek capital sigma
 643 cmpGreek[","] := "{u+03c2}"  ; (ς) Greek small final sigma
 644 cmpGreek["t"] := "{u+03c4}"  ; (τ) Greek small tau
 645 cmpGreek["T"] := "{u+03a4}"  ; (Τ) Greek capital tau
 646 cmpGreek["u"] := "{u+03c5}"  ; (υ) Greek small upsilon
 647 cmpGreek["U"] := "{u+03a5}"  ; (Υ) Greek capital upsilon
 648 cmpGreek["y"] := "{u+03c5}"  ; (υ) Greek small upsilon
 649 cmpGreek["Y"] := "{u+03a5}"  ; (Υ) Greek capital upsilon
 650 cmpGreek["f"] := "{u+03c6}"  ; (φ) Greek small phi
 651 cmpGreek["F"] := "{u+03a6}"  ; (Φ) Greek capital phi
 652 cmpGreek["c"] := "{u+03c7}"  ; (χ) Greek small chi
 653 cmpGreek["C"] := "{u+03a7}"  ; (Χ) Greek capital chi
 654 cmpGreek["w"] := "{u+03c8}"  ; (ψ) Greek small psi
 655 cmpGreek["W"] := "{u+03a8}"  ; (Ψ) Greek capital psi
 656 cmpGreek["q"] := "{u+03c9}"  ; (ω) Greek small omega
 657 cmpGreek["Q"] := "{u+03a9}"  ; (Ω) Greek capital omega
 658
 659
 660 ; Compose :  Superscript Characters (p)
 661
 662 global cmpSuperscript := Map()
 663 cmpSuperscript["1"] := "{u+00b9}"  ; (¹) superscript 1
 664 cmpSuperscript["2"] := "{u+00b2}"  ; (²) superscript 2
 665 cmpSuperscript["3"] := "{u+00b3}"  ; (³) superscript 3
 666 cmpSuperscript["4"] := "{u+2074}"  ; (⁴) superscript 4
 667 cmpSuperscript["5"] := "{u+2075}"  ; (⁵) superscript 5
 668 cmpSuperscript["6"] := "{u+2076}"  ; (⁶) superscript 6
 669 cmpSuperscript["7"] := "{u+2077}"  ; (⁷) superscript 7
 670 cmpSuperscript["8"] := "{u+2078}"  ; (⁸) superscript 8
 671 cmpSuperscript["9"] := "{u+2079}"  ; (⁹) superscript 9
 672 cmpSuperscript["0"] := "{u+2070}"  ; (⁰) superscript 0
 673 cmpSuperscript["i"] := "{u+2071}"  ; (ⁱ) superscript i
 674 cmpSuperscript["n"] := "{u+207f}"  ; (ⁿ) superscript n
 675 cmpSuperscript["+"] := "{u+207a}"  ; (⁺) superscript +
 676 cmpSuperscript["-"] := "{u+207b}"  ; (⁻) superscript -
 677 cmpSuperscript["="] := "{u+207c}"  ; (⁼) superscript =
 678 cmpSuperscript["("] := "{u+207d}"  ; (⁽) superscript (
 679 cmpSuperscript[")"] := "{u+207e}"  ; (⁾) superscript )
 680
 681
 682 ; Compose :  Subscript Characters (u)
 683
 684 global cmpSubscript := Map()
 685 cmpSubscript["1"] := "{u+2081}"  ; (₁) subscript 1
 686 cmpSubscript["2"] := "{u+2082}"  ; (₂) subscript 2
 687 cmpSubscript["3"] := "{u+2083}"  ; (₃) subscript 3
 688 cmpSubscript["4"] := "{u+2084}"  ; (₄) subscript 4
 689 cmpSubscript["5"] := "{u+2085}"  ; (₅) subscript 5
 690 cmpSubscript["6"] := "{u+2086}"  ; (₆) subscript 6
 691 cmpSubscript["7"] := "{u+2087}"  ; (₇) subscript 7
 692 cmpSubscript["8"] := "{u+2088}"  ; (₈) subscript 8
 693 cmpSubscript["9"] := "{u+2089}"  ; (₉) subscript 9
 694 cmpSubscript["0"] := "{u+2080}"  ; (₀) subscript 0
 695 cmpSubscript["a"] := "{u+2090}"  ; (ₐ) subscript a
 696 cmpSubscript["b"] := "{u+1d66}"  ; (ᵦ) subscript beta
 697 cmpSubscript["c"] := "{u+1d6a}"  ; (ᵪ) subscript chi
 698 cmpSubscript["e"] := "{u+2091}"  ; (ₑ) subscript e
 699 cmpSubscript["E"] := "{u+2094}"  ; (ₔ) subscript schwa
 700 cmpSubscript["f"] := "{u+1d69}"  ; (ᵩ) subscript phi
 701 cmpSubscript["g"] := "{u+1d67}"  ; (ᵧ) subscript gamma
 702 cmpSubscript["h"] := "{u+2095}"  ; (ₕ) subscript h
 703 cmpSubscript["i"] := "{u+1d62}"  ; (ᵢ) subscript i
 704 cmpSubscript["j"] := "{u+2c7c}"  ; (ⱼ) subscript j
 705 cmpSubscript["k"] := "{u+2096}"  ; (ₖ) subscript k
 706 cmpSubscript["l"] := "{u+2097}"  ; (ₗ) subscript l
 707 cmpSubscript["m"] := "{u+2098}"  ; (ₘ) subscript m
 708 cmpSubscript["n"] := "{u+2099}"  ; (ₙ) subscript n
 709 cmpSubscript["o"] := "{u+2092}"  ; (ₒ) subscript o
 710 cmpSubscript["p"] := "{u+209a}"  ; (ₚ) subscript p
 711 cmpSubscript["r"] := "{u+1d63}"  ; (ᵣ) subscript r
 712 cmpSubscript["R"] := "{u+1d68}"  ; (ᵨ) subscript rho
 713 cmpSubscript["s"] := "{u+209b}"  ; (ₛ) subscript s
 714 cmpSubscript["t"] := "{u+209c}"  ; (ₜ) subscript t
 715 cmpSubscript["u"] := "{u+1d64}"  ; (ᵤ) subscript u
 716 cmpSubscript["v"] := "{u+1d65}"  ; (ᵥ) subscript v
 717 cmpSubscript["x"] := "{u+2093}"  ; (ₓ) subscript x
 718 cmpSubscript["+"] := "{u+208a}"  ; (₊) subscript +
 719 cmpSubscript["-"] := "{u+208b}"  ; (₋) subscript -
 720 cmpSubscript["="] := "{u+208c}"  ; (₌) subscript =
 721 cmpSubscript["("] := "{u+208d}"  ; (₍) subscript (
 722 cmpSubscript[")"] := "{u+208e}"  ; (₎) subscript )
 723
 724
 725 ; Compose :  Spacing Characters and Dashes
 726
 727 global cmpSpace := Map()
 728 global cmpQuad := Map()
 729 cmpSpace["2"] := "{u+2002}"  ; en space
 730 cmpSpace["3"] := "{u+2003}"  ; em space
 731 cmpSpace["1"] := "{u+2004}"  ; three-per-em space
 732 cmpSpace["4"] := "{u+2005}"  ; four-per-em space
 733 cmpSpace["5"] := "{u+2008}"  ; punctuation space
 734 cmpSpace["6"] := "{u+2006}"  ; six-per-em space
 735 cmpSpace["7"] := "{u+2009}"  ; thin space
 736 cmpSpace["8"] := "{u+200a}"  ; hair space
 737 cmpSpace["9"] := "{u+2007}"  ; figure space
 738 cmpSpace["0"] := "{u+200b}"  ; zero-width space
 739 cmpSpace[" "] := "{u+00a0}"  ; non-breaking space
 740 cmpSpace["."] := "{u+202f}"  ; narrow no-break space
 741 cmpMacronStroke["2"] := "{u+2013}"  ; (–) en dash
 742 cmpMacronStroke["3"] := "{u+2014}"  ; (—) em dash
 743 cmpMacronStroke["4"] := "{u+2015}"  ; (―) horizontal bar
 744 cmpMacronStroke["5"] := "{u+2010}"  ; (‐) hyphen
 745 cmpMacronStroke["9"] := "{u+2012}"  ; (‒) figure dash
 746 cmpMacronStroke["0"] := "{u+00ad}"  ; () soft hyphen
 747 cmpMacronStroke["-"] := "{u+2011}"  ; (‑) non-breaking hyphen
 748 cmpQuad["2"] := "{u+2000}"  ; en quad
 749 cmpQuad["3"] := "{u+2001}"  ; em quad
 750
 751
 752 ; Compose :  Arrows and Pointers
 753
 754 global cmpArrow := Map()
 755 cmpArrow["w"] := "{u+25b2}"  ; (▲) black up-pointing triangle
 756 cmpArrow["a"] := "{u+25c0}"  ; (◀) black left-pointing triangle
 757 cmpArrow["s"] := "{u+25bc}"  ; (▼) black down-pointing triangle
 758 cmpArrow["d"] := "{u+25b6}"  ; (▶) black right-pointing triangle
 759 cmpArrow["i"] := "{u+25b3}"  ; (△) white up-pointing triangle
 760 cmpArrow["j"] := "{u+25c1}"  ; (◁) white left-pointing triangle
 761 cmpArrow["k"] := "{u+25bd}"  ; (▽) white down-pointing triangle
 762 cmpArrow["l"] := "{u+25b7}"  ; (▷) white right-pointing triangle
 763 cmpArrow["1"] := "{u+2199}"  ; (↙) south west arrow
 764 cmpArrow["2"] := "{u+2193}"  ; (↓) downwards arrow
 765 cmpArrow["3"] := "{u+2198}"  ; (↘) south east arrow
 766 cmpArrow["4"] := "{u+2190}"  ; (←) leftwards arrow
 767 cmpArrow["5"] := "{u+2195}"  ; (↕) up down arrow
 768 cmpArrow["6"] := "{u+2192}"  ; (→) rightwards arrow
 769 cmpArrow["7"] := "{u+2196}"  ; (↖) north west arrow
 770 cmpArrow["8"] := "{u+2191}"  ; (↑) upwards arrow
 771 cmpArrow["9"] := "{u+2197}"  ; (↗) north east arrow
 772 cmpArrow["0"] := "{u+2194}"  ; (↔) left right arrow
 773 cmpDoubleAcute["1"] := "{u+21d9}"  ; (⇙) south west double arrow
 774 cmpDoubleAcute["2"] := "{u+21d3}"  ; (⇓) downwards double arrow
 775 cmpDoubleAcute["3"] := "{u+21d8}"  ; (⇘) south east double arrow
 776 cmpDoubleAcute["4"] := "{u+21d0}"  ; (⇐) leftwards double arrow
 777 cmpDoubleAcute["5"] := "{u+21d5}"  ; (⇕) up down double arrow
 778 cmpDoubleAcute["6"] := "{u+21d2}"  ; (⇒) rightwards double arrow
 779 cmpDoubleAcute["7"] := "{u+21d6}"  ; (⇖) north west double arrow
 780 cmpDoubleAcute["8"] := "{u+21d1}"  ; (⇑) upwards double arrow
 781 cmpDoubleAcute["9"] := "{u+21d7}"  ; (⇗) north east double arrow
 782 cmpDoubleAcute["0"] := "{u+21d4}"  ; (⇔) left right double arrow
 783
 784
 785 ; Compose :  Miscellaneous Symbols (s)
 786
 787 global cmpSymbols := Map()
 788 cmpSymbols["a"] := "{u+214d}"  ; (⅍) aktieselskab
 789 cmpSymbols["c"] := "{u+2105}"  ; (℅) care of
 790 cmpSymbols["d"] := "{u+22c4}"  ; (⋄) diamond operator
 791 cmpSymbols["e"] := "{u+212e}"  ; (℮) estimated symbol
 792 cmpSymbols["f"] := "{u+2640}"  ; (♀) Venus symbol (female)
 793 cmpSymbols["i"] := "{u+2300}"  ; (⌀) diameter sign
 794 cmpSymbols["l"] := "{u+2113}"  ; (ℓ) script small l
 795 cmpSymbols["L"] := "{u+2112}"  ; (ℒ) Laplace transform
 796 cmpSymbols["m"] := "{u+2642}"  ; (♂) Mars symbol (male)
 797 cmpSymbols["M"] := "{u+2120}"  ; (℠) service mark
 798 cmpSymbols["n"] := "{u+2709}"  ; (✉) envelope
 799 cmpSymbols["q"] := "{u+2126}"  ; (Ω) ohm sign (backwards compatibility)
 800 cmpSymbols["r"] := "{u+211e}"  ; (℞) prescription take (Recipere)
 801 cmpSymbols["R"] := "{u+211e}"  ; (℞) prescription take (Recipere)
 802 cmpSymbols["t"] := "{u+2706}"  ; (✆) telephone location sign
 803 cmpSymbols["v"] := "{u+2713}"  ; (✓) check mark
 804 cmpSymbols["V"] := "{u+2714}"  ; (✔) heavy check mark
 805 cmpSymbols["w"] := "{u+26a0}"  ; (⚠) warning sign
 806 cmpSymbols["x"] := "{u+2717}"  ; (✗) ballot x
 807 cmpSymbols["X"] := "{u+2718}"  ; (✘) heavy ballot x
 808 cmpSymbols["y"] := "{u+2713}"  ; (✓) check mark
 809 cmpSymbols["Y"] := "{u+2714}"  ; (✔) heavy check mark
 810 cmpSymbols["2"] := "{u+266b}"  ; (♫) beamed eighth notes
 811 cmpSymbols["3"] := "{u+2042}"  ; (⁂) asterism
 812 cmpSymbols["5"] := "{u+2605}"  ; (★) black star
 813 cmpSymbols["%"] := "{u+2606}"  ; (☆) white star
 814 cmpSymbols["6"] := "{u+273d}"  ; (✽) heavy teardrop-spoked asterisk
 815 cmpSymbols["^"] := "{u+273b}"  ; (✻) teardrop-spoked asterisk
 816 cmpSymbols["8"] := "{u+266a}"  ; (♪) eighth note
 817 cmpSymbols[";"] := "{u+263a}"  ; (☺) white smiling face
 818 cmpSymbols[":"] := "{u+263b}"  ; (☻) black smiling face
 819 cmpSymbols["!"] := "{u+203c}"  ; (‼) double exclamation mark
 820 cmpSymbols["?"] := "{u+203d}"  ; (‽) interrobang
 821 cmpSymbols["\"] := "{u+205e}"  ; (⁞) vertical four dots
 822 cmpSymbols["|"] := "{u+00a6}"  ; (¦) broken bar
 823 cmpSymbols["."] := "{u+2e18}"  ; (⸘) inverted interrobang
 824 cmpSymbols["/"] := "{u+2e2e}"  ; (⸮) reversed question mark
 825
 826
 827 ; Compose :  Florette and Floral Heart Symbols (f)
 828
 829 global cmpFlorette := Map()
 830 cmpFlorette["r"] := "{u+2619}"  ; (☙) reversed rotated floral heart bullet
 831 cmpFlorette["6"] := "{u+273e}"  ; (✾) six petalled black and white florette
 832 cmpFlorette["b"] := "{u+273f}"  ; (✿) black florette
 833 cmpFlorette["w"] := "{u+2740}"  ; (❀) white florette
 834 cmpFlorette["8"] := "{u+2741}"  ; (❁) eight petalled outlined black florette
 835 cmpFlorette["f"] := "{u+2766}"  ; (❦) floral heart
 836 cmpFlorette["h"] := "{u+2767}"  ; (❧) rotated floral heart bullet
 837
 838
 839 ; Compose :  Chess Symbols (C)
 840
 841 global cmpCapitalC := Map()
 842 cmpCapitalC["k"] := "{u+2654}"  ; (♔) white chess king
 843 cmpCapitalC["q"] := "{u+2655}"  ; (♕) white chess queen
 844 cmpCapitalC["r"] := "{u+2656}"  ; (♖) white chess rook
 845 cmpCapitalC["b"] := "{u+2657}"  ; (♗) white chess bishop
 846 cmpCapitalC["n"] := "{u+2658}"  ; (♘) white chess knight
 847 cmpCapitalC["p"] := "{u+2659}"  ; (♙) white chess pawn
 848 cmpCapitalC["K"] := "{u+265a}"  ; (♚) black chess king
 849 cmpCapitalC["Q"] := "{u+265b}"  ; (♛) black chess queen
 850 cmpCapitalC["R"] := "{u+265c}"  ; (♜) black chess rook
 851 cmpCapitalC["B"] := "{u+265d}"  ; (♝) black chess bishop
 852 cmpCapitalC["N"] := "{u+265e}"  ; (♞) black chess knight
 853 cmpCapitalC["P"] := "{u+265f}"  ; (♟) black chess pawn
 854
 855
 856 ; Compose :  Playing Card Suit Symbols (S)
 857
 858 global cmpCapitalS := Map()
 859 cmpCapitalS["c"] := "{u+2663}"  ; (♣) black club suit
 860 cmpCapitalS["C"] := "{u+2667}"  ; (♧) white club suit
 861 cmpCapitalS["d"] := "{u+2666}"  ; (♦) black diamond suit
 862 cmpCapitalS["D"] := "{u+2662}"  ; (♢) white diamond suit
 863 cmpCapitalS["h"] := "{u+2665}"  ; (♥) black heart suit
 864 cmpCapitalS["H"] := "{u+2661}"  ; (♡) white heart suit
 865 cmpCapitalS["p"] := "{u+2660}"  ; (♠) black spade suit
 866 cmpCapitalS["P"] := "{u+2664}"  ; (♤) white spade suit
 867
 868
 869 ; Compose :  Vulgar Fractions
 870
 871 global cmpOne := Map()
 872 global cmpTwo := Map()
 873 global cmpThree := Map()
 874 global cmpFour := Map()
 875 global cmpFive := Map()
 876 global cmpSeven := Map()
 877 global cmpZero := Map()
 878 cmpOne["2"] := "{u+00bd}"    ; (½) vulgar fraction 1/2
 879 cmpOne["3"] := "{u+2153}"    ; (⅓) vulgar fraction 1/3
 880 cmpTwo["3"] := "{u+2154}"    ; (⅔) vulgar fraction 2/3
 881 cmpOne["4"] := "{u+00bc}"    ; (¼) vulgar fraction 1/4
 882 cmpThree["4"] := "{u+00be}"  ; (¾) vulgar fraction 3/4
 883 cmpOne["5"] := "{u+2155}"    ; (⅕) vulgar fraction 1/5
 884 cmpTwo["5"] := "{u+2156}"    ; (⅖) vulgar fraction 2/5
 885 cmpThree["5"] := "{u+2157}"  ; (⅗) vulgar fraction 3/5
 886 cmpFour["5"] := "{u+2158}"   ; (⅘) vulgar fraction 4/5
 887 cmpOne["6"] := "{u+2159}"    ; (⅙) vulgar fraction 1/6
 888 cmpFive["6"] := "{u+215a}"   ; (⅚) vulgar fraction 5/6
 889 cmpOne["7"] := "{u+2150}"    ; (⅐) vulgar fraction 1/7
 890 cmpOne["8"] := "{u+215b}"    ; (⅛) vulgar fraction 1/8
 891 cmpThree["8"] := "{u+215c}"  ; (⅜) vulgar fraction 3/8
 892 cmpFive["8"] := "{u+215d}"   ; (⅝) vulgar fraction 5/8
 893 cmpSeven["8"] := "{u+215e}"  ; (⅞) vulgar fraction 7/8
 894 cmpOne["9"] := "{u+2151}"    ; (⅑) vulgar fraction 1/9
 895 cmpOne["0"] := "{u+2152}"    ; (⅒) vulgar fraction 1/10
 896 cmpZero["3"] := "{u+2189}"   ; (↉) vulgar fraction 0/3
 897
 898
 899 ; Compose :  Math Symbols (m)
 900
 901 global cmpMathSymbols := Map()
 902 cmpMathSymbols["a"] := "{u+2200}"  ; (∀) for all
 903 cmpMathSymbols["A"] := "{u+2200}"  ; (∀) for all
 904 cmpMathSymbols["b"] := "{u+2286}"  ; (⊆) subset of or equal to
 905 cmpMathSymbols["B"] := "{u+2287}"  ; (⊇) superset of or equal to
 906 cmpMathSymbols["c"] := "{u+221d}"  ; (∝) proportional to
 907 cmpMathSymbols["C"] := "{u+2102}"  ; (ℂ) complex numbers
 908 cmpMathSymbols["d"] := "{u+2206}"  ; (∆) increment operator
 909 cmpMathSymbols["D"] := "{u+2207}"  ; (∇) nabla/del operator
 910 cmpMathSymbols["e"] := "{u+2203}"  ; (∃) there exists
 911 cmpMathSymbols["E"] := "{u+2204}"  ; (∄) there does not exist
 912 cmpMathSymbols["f"] := "{u+0192}"  ; (ƒ) f with hook
 913 cmpMathSymbols["F"] := "{u+220e}"  ; (∎) end of proof
 914 cmpMathSymbols["g"] := "{u+2282}"  ; (⊂) subset of
 915 cmpMathSymbols["G"] := "{u+2284}"  ; (⊄) not a subset of
 916 cmpMathSymbols["h"] := "{u+2283}"  ; (⊃) superset of
 917 cmpMathSymbols["H"] := "{u+2285}"  ; (⊅) not a superset of
 918 cmpMathSymbols["I"] := "{u+2111}"  ; (ℑ) imaginary numbers
 919 cmpMathSymbols["j"] := "{u+2245}"  ; (≅) congruent to
 920 cmpMathSymbols["J"] := "{u+2247}"  ; (≇) not congruent to
 921 cmpMathSymbols["k"] := "{u+220b}"  ; (∋) contains as member
 922 cmpMathSymbols["K"] := "{u+220c}"  ; (∌) does not contain as member
 923 cmpMathSymbols["l"] := "{u+2225}"  ; (∥) parallel to
 924 cmpMathSymbols["L"] := "{u+2226}"  ; (∦) not parallel to
 925 cmpMathSymbols["m"] := "{u+2208}"  ; (∈) element of
 926 cmpMathSymbols["M"] := "{u+2209}"  ; (∉) not an element of
 927 cmpMathSymbols["n"] := "{u+00ac}"  ; (¬) not sign
 928 cmpMathSymbols["N"] := "{u+2115}"  ; (ℕ) natural numbers
 929 cmpMathSymbols["o"] := "{u+2218}"  ; (∘) ring operator
 930 cmpMathSymbols["O"] := "{u+2205}"  ; (∅) empty set
 931 cmpMathSymbols["p"] := "{u+2202}"  ; (∂) partial differential
 932 cmpMathSymbols["P"] := "{u+2119}"  ; (ℙ) prime numbers
 933 cmpMathSymbols["Q"] := "{u+211a}"  ; (ℚ) rational numbers
 934 cmpMathSymbols["R"] := "{u+211d}"  ; (ℝ) real numbers
 935 cmpMathSymbols["s"] := "{u+2229}"  ; (∩) set intersection
 936 cmpMathSymbols["S"] := "{u+222b}"  ; (∫) integral symbol
 937 cmpMathSymbols["t"] := "{u+2261}"  ; (≡) identical to
 938 cmpMathSymbols["T"] := "{u+2262}"  ; (≢) not identical to
 939 cmpMathSymbols["u"] := "{u+222a}"  ; (∪) set union
 940 cmpMathSymbols["U"] := "{u+2216}"  ; (∖) set minus
 941 cmpMathSymbols["w"] := "{u+2118}"  ; (℘) Weierstrass elliptic function
 942 cmpMathSymbols["z"] := "{u+21af}"  ; (↯) downwards zigzag arrow
 943 cmpMathSymbols["Z"] := "{u+2124}"  ; (ℤ) whole numbers
 944 cmpMathSymbols["6"] := "{u+2220}"  ; (∠) angle symbol
 945 cmpMathSymbols["&"] := "{u+2227}"  ; (∧) logical and
 946 cmpMathSymbols["8"] := "{u+2297}"  ; (⊗) circled times
 947 cmpMathSymbols["*"] := "{u+2299}"  ; (⊙) circled dot operator
 948 cmpMathSymbols["9"] := "{u+221f}"  ; (∟) right angle
 949 cmpMathSymbols["0"] := "{u+2221}"  ; (∡) measured angle
 950 cmpMathSymbols["+"] := "{u+2295}"  ; (⊕) circled plus
 951 cmpMathSymbols["-"] := "{u+2296}"  ; (⊖) circled minus
 952 cmpMathSymbols["/"] := "{u+2298}"  ; (⊘) circled division slash
 953 cmpMathSymbols["="] := "{u+225d}"  ; (≝) equal to by definition
 954 cmpMathSymbols[";"] := "{u+2235}"  ; (∵) because sign
 955 cmpMathSymbols[":"] := "{u+2234}"  ; (∴) therefore sign
 956 cmpMathSymbols["|"] := "{u+2228}"  ; (∨) logical or
 957
 958
 959 ; Compose :  Special Letters/Characters
 960
 961 global cmpCapitalA := Map()
 962 global cmpSmallD := Map()
 963 global cmpCapitalD := Map()
 964 global cmpSmallI := Map()
 965 global cmpCapitalI := Map()
 966 global cmpCapitalO := Map()
 967 global cmpCapitalT := Map()
 968 cmpArrow["e"] := "{u+00e6}"      ; (æ) letter ae
 969 cmpCapitalA["E"] := "{u+00c6}"   ; (Æ) letter AE
 970 cmpSmallD["h"] := "{u+00f0}"     ; (ð) small letter eth
 971 cmpCapitalD["H"] := "{u+00d0}"   ; (Ð) capital letter eth
 972 cmpSmallI["j"] := "{u+0133}"     ; (ĳ) ligature ij
 973 cmpCapitalI["J"] := "{u+0132}"   ; (Ĳ) ligature IJ
 974 cmpRingAbove["e"] := "{u+0153}"  ; (œ) ligature oe
 975 cmpCapitalO["E"] := "{u+0152}"   ; (Œ) ligature OE
 976 cmpSymbols["s"] := "{u+00df}"    ; (ß) small sharp s (Eszett)
 977 cmpCapitalS["S"] := "{u+1e9e}"   ; (ẞ) capital sharp S (capital Eszett)
 978 cmpTurned["h"] := "{u+00fe}"     ; (þ) small letter thorn
 979 cmpCapitalT["H"] := "{u+00de}"   ; (Þ) capital letter thorn
 980
 981
 982 ; Compose :  General/Math Symbols
 983
 984 global cmpEight := Map()
 985 global cmpSmallN := Map()
 986 global cmpCapitalN := Map()
 987 global cmpCapitalP := Map()
 988 global cmpSmallR := Map()
 989 global cmpAsterisk := Map()
 990 global cmpExclam := Map()
 991 global cmpQuestion := Map()
 992 global cmpParenLeft := Map()
 993 global cmpPlus := Map()
 994 global cmpPercent := Map()
 995 global cmpLessThan := Map()
 996 global cmpGreaterThan := Map()
 997 global cmpBracketLeft := Map()
 998 cmpSmallD["d"] := "{u+2020}"        ; (†) dagger
 999 cmpCapitalD["D"] := "{u+2021}"      ; (‡) double dagger
1000 cmpSmallI["i"] := "{u+221e}"        ; (∞) infinity symbol
1001 cmpEight["8"] := "{u+221e}"         ; (∞) infinity symbol
1002 cmpMathSymbols["i"] := "{u+00b5}"   ; (µ) micro sign
1003 cmpSmallN["o"] := "{u+2116}"        ; (№) numero sign
1004 cmpCapitalN["o"] := "{u+2116}"      ; (№) numero sign
1005 cmpRingAbove["x"] := "{u+00a4}"     ; (¤) currency sign
1006 cmpSuperscript["p"] := "{u+00b6}"   ; (¶) pilcrow sign
1007 cmpCapitalP["P"] := "{u+00b6}"      ; (¶) pilcrow sign
1008 cmpSmallR["2"] := "{u+221a}"        ; (√) square root
1009 cmpSmallR["3"] := "{u+221b}"        ; (∛) cube root
1010 cmpSmallR["4"] := "{u+221c}"        ; (∜) fourth root
1011 cmpSymbols["o"] := "{u+00a7}"       ; (§) section sign
1012 cmpCapitalS["o"] := "{u+00a7}"      ; (§) section sign
1013 cmpTurned["m"] := "{u+2122}"        ; (™) trademark symbol
1014 cmpAcuteAccent["1"] := "{u+2032}"   ; (′) prime
1015 cmpAcuteAccent["2"] := "{u+2033}"   ; (″) double prime
1016 cmpAcuteAccent["3"] := "{u+2034}"   ; (‴) triple prime
1017 cmpAcuteAccent["4"] := "{u+2057}"   ; (⁗) quadruple prime
1018 cmpAsterisk["*"] := "{u+00d7}"      ; (×) multiplication sign
1019 cmpStroke["/"] := "{u+00f7}"        ; (÷) division sign
1020 cmpAsterisk["o"] := "{u+00b0}"      ; (°) degree sign
1021 cmpRingAbove["*"] := "{u+00b0}"     ; (°) degree sign
1022 cmpDotAbove["."] := "{u+00b7}"      ; (·) middle dot
1023 cmpDotAbove[" "] := "{u+00b7}"      ; (·) middle dot
1024 cmpDotAbove["3"] := "{u+2026}"      ; (…) horizontal ellipsis
1025 cmpArrow["-"] := "{u+00aa}"         ; (ª) feminine ordinal indicator (Spanish, Portuguese, Italian, Galician)
1026 cmpRingAbove["-"] := "{u+00ba}"     ; (º) masculine ordinal indicator (Spanish, Portuguese, Italian, Galician)
1027 cmpExclam["!"] := "{u+00a1}"        ; (¡) inverted exclamation mark
1028 cmpQuestion["?"] := "{u+00bf}"      ; (¿) inverted question mark
1029 cmpRingAbove["c"] := "{u+00a9}"     ; (©) copyright sign
1030 cmpParenLeft["c"] := "{u+00a9}"     ; (©) copyright sign
1031 cmpRingAbove["p"] := "{u+2117}"     ; (℗) sound recording copyright
1032 cmpParenLeft["p"] := "{u+2117}"     ; (℗) sound recording copyright
1033 cmpRingAbove["r"] := "{u+00ae}"     ; (®) registered sign
1034 cmpParenLeft["r"] := "{u+00ae}"     ; (®) registered sign
1035 cmpPlus["-"] := "{u+00b1}"          ; (±) plus-minus sign
1036 cmpMacronStroke["+"] := "{u+2213}"  ; (∓) minus-or-plus sign
1037 cmpPercent["%"] := "{u+2030}"       ; (‰) per mille sign
1038 cmpPercent["3"] := "{u+2030}"       ; (‰) per mille sign
1039 cmpPercent["4"] := "{u+2031}"       ; (‱) per ten thousand sign
1040 cmpExclam["="] := "{u+2260}"        ; (≠) not equal to
1041 cmpLessThan[">"] := "{u+2260}"      ; (≠) not equal to
1042 cmpLessThan["="] := "{u+2264}"      ; (≤) less-than or equal to
1043 cmpGreaterThan["="] := "{u+2265}"   ; (≥) greater-than or equal to
1044 cmpLessThan["+"] := "{u+2a7d}"      ; (⩽) less-than or slanted equal to
1045 cmpGreaterThan["+"] := "{u+2a7e}"   ; (⩾) greater-than or slanted equal to
1046 cmpTilde["~"] := "{u+2248}"         ; (≈) almost equal to
1047 cmpBracketLeft["]"] := "{u+2610}"   ; (☐) ballot box
1048 cmpBracketLeft["v"] := "{u+2611}"   ; (☑) ballot box with check
1049 cmpBracketLeft["y"] := "{u+2611}"   ; (☑) ballot box with check
1050 cmpBracketLeft["x"] := "{u+2612}"   ; (☒) ballot box with x
1051
1052
1053 ; Compose :  Bullets and Arrowheads (;)
1054
1055 global cmpSemicolon := Map()
1056 cmpSemicolon["a"] := "{u+27a4}"  ; (➤) black rightwards arrowhead
1057 cmpSemicolon["b"] := "{u+2022}"  ; (•) bullet
1058 cmpSemicolon[";"] := "{u+2022}"  ; (•) bullet
1059 cmpSemicolon["d"] := "{u+27a5}"  ; (➥) heavy black curved downwards and rightwards arrow
1060 cmpSemicolon["h"] := "{u+2043}"  ; (⁃) hyphen bullet
1061 cmpSemicolon["-"] := "{u+2043}"  ; (⁃) hyphen bullet
1062 cmpSemicolon["p"] := "{u+27a8}"  ; (➨) heavy concave-pointed black rightwards arrow
1063 cmpSemicolon["q"] := "{u+27a7}"  ; (➧) squat black rightwards arrow
1064 cmpSemicolon["r"] := "{u+27a1}"  ; (➡) black rightwards arrow
1065 cmpSemicolon["t"] := "{u+2023}"  ; (‣) triangular bullet
1066 cmpSemicolon["u"] := "{u+27a6}"  ; (➦) heavy black curved upwards and rightwards arrow
1067 cmpSemicolon["w"] := "{u+25e6}"  ; (◦) white bullet
1068 cmpSemicolon["3"] := "{u+27a2}"  ; (➢) 3d top-lighted rightwards arrowhead
1069 cmpSemicolon["#"] := "{u+27a3}"  ; (➣) 3d bottom-lighted rightwards arrowhead
1070
1071
1072 ; Compose :  Quotation Marks
1073
1074 global cmpBracketRight := Map()
1075 cmpCedillaOgonek[chr(34)] := "{u+201e}"  ; („) double low-9 quotation mark
1076 cmpDiaeresis[","] := "{u+201e}"          ; („) double low-9 quotation mark
1077 cmpCedillaOgonek["'"] := "{u+201a}"      ; (‚) single low-9 quotation mark
1078 cmpAcuteAccent[","] := "{u+201a}"        ; (‚) single low-9 quotation mark
1079 cmpDiaeresis["["] := "{u+201c}"          ; (“) left double quotation mark
1080 cmpBracketLeft[chr(34)] := "{u+201c}"    ; (“) left double quotation mark
1081 cmpDiaeresis["]"] := "{u+201d}"          ; (”) right double quotation mark
1082 cmpBracketRight[chr(34)] := "{u+201d}"   ; (”) right double quotation mark
1083 cmpAcuteAccent["["] := "{u+2018}"        ; (‘) left single quotation mark
1084 cmpBracketLeft["'"] := "{u+2018}"        ; (‘) left single quotation mark
1085 cmpAcuteAccent["]"] := "{u+2019}"        ; (’) right single quotation mark
1086 cmpBracketRight["'"] := "{u+2019}"       ; (’) right single quotation mark
1087 cmpLessThan["<"] := "{u+00ab}"           ; («) left-pointing double angle quotation mark
1088 cmpLessThan[chr(34)] := "{u+00ab}"       ; («) left-pointing double angle quotation mark
1089 cmpDiaeresis["<"] := "{u+00ab}"          ; («) left-pointing double angle quotation mark
1090 cmpGreaterThan[">"] := "{u+00bb}"        ; (») right-pointing double angle quotation mark
1091 cmpGreaterThan[chr(34)] := "{u+00bb}"    ; (») right-pointing double angle quotation mark
1092 cmpDiaeresis[">"] := "{u+00bb}"          ; (») right-pointing double angle quotation mark
1093 cmpLessThan["'"] := "{u+2039}"           ; (‹) left-pointing single angle quotation mark
1094 cmpAcuteAccent["<"] := "{u+2039}"        ; (‹) left-pointing single angle quotation mark
1095 cmpGreaterThan["'"] := "{u+203a}"        ; (›) right-pointing single angle quotation mark
1096 cmpAcuteAccent[">"] := "{u+203a}"        ; (›) right-pointing single angle quotation mark
1097
1098
1099 ; Compose :  Letters with Two Diacritical Marks
1100
1101 global cmpSmallE := Map()
1102 global cmpCapitalE := Map()
1103 global cmpCapitalV := Map()
1104 cmpArrow[chr(34)] := "{u+01df}"      ; (ǟ) a with diaeresis and macron
1105 cmpCapitalA[chr(34)] := "{u+01de}"   ; (Ǟ) A with diaeresis and macron
1106 cmpArrow["."] := "{u+01e1}"          ; (ǡ) a with dot above and macron
1107 cmpCapitalA["."] := "{u+01e0}"       ; (Ǡ) A with dot above and macron
1108 cmpArrow["'"] := "{u+01fb}"          ; (ǻ) a with ring above and acute
1109 cmpCapitalA["'"] := "{u+01fa}"       ; (Ǻ) A with ring above and acute
1110 cmpCircumflex["'"] := "{u+1e09}"     ; (ḉ) c with cedilla and acute
1111 cmpCapitalC["'"] := "{u+1e08}"       ; (Ḉ) C with cedilla and acute
1112 cmpSmallE["-"] := "{u+01e3}"         ; (ǣ) ae with macron
1113 cmpCapitalE["-"] := "{u+01e2}"       ; (Ǣ) AE with macron
1114 cmpSmallE["'"] := "{u+01fd}"         ; (ǽ) ae with acute
1115 cmpCapitalE["'"] := "{u+01fc}"       ; (Ǽ) AE with acute
1116 cmpRingAbove[","] := "{u+01ed}"      ; (ǭ) o with ogonek and macron
1117 cmpCapitalO[","] := "{u+01ec}"       ; (Ǭ) O with ogonek and macron
1118 cmpRingAbove["'"] := "{u+01ff}"      ; (ǿ) o with stroke and acute
1119 cmpCapitalO["'"] := "{u+01fe}"       ; (Ǿ) O with stroke and acute
1120 cmpRingAbove[chr(34)] := "{u+022b}"  ; (ȫ) o with diaeresis and macron
1121 cmpCapitalO[chr(34)] := "{u+022a}"   ; (Ȫ) O with diaeresis and macron
1122 cmpRingAbove["~"] := "{u+022d}"      ; (ȭ) o with tilde and macron
1123 cmpCapitalO["~"] := "{u+022c}"       ; (Ȭ) O with tilde and macron
1124 cmpRingAbove["."] := "{u+0231}"      ; (ȱ) o with dot above and macron
1125 cmpCapitalO["."] := "{u+0230}"       ; (Ȱ) O with dot above and macron
1126 cmpCaron["-"] := "{u+01d6}"          ; (ǖ) u with diaeresis and macron
1127 cmpCapitalV["-"] := "{u+01d5}"       ; (Ǖ) U with diaeresis and macron
1128 cmpCaron["'"] := "{u+01d8}"          ; (ǘ) u with diaeresis and acute
1129 cmpCapitalV["'"] := "{u+01d7}"       ; (Ǘ) U with diaeresis and acute
1130 cmpCaron["v"] := "{u+01da}"          ; (ǚ) u with diaeresis and caron
1131 cmpCapitalV["v"] := "{u+01d9}"       ; (Ǚ) U with diaeresis and caron
1132 cmpCaron["``"] := "{u+01dc}"         ; (ǜ) u with diaeresis and grave
1133 cmpCapitalV["``"] := "{u+01db}"      ; (Ǜ) U with diaeresis and grave
1134
1135
1136 ; Configuration :  'Right Alt' and 'Right Alt + Shift' on US QWERTY
1137
1138 >!a:: {
1139   if GetKeyState("CapsLock", "T")
1140     Send "{u+00c4}"  ; (Ä) A with diaeresis
1141   else
1142     Send "{u+00e4}"  ; (ä) a with diaeresis
1143 }
1144 >!+a:: {
1145   if GetKeyState("CapsLock", "T")
1146     Send "{u+00e4}"  ; (ä) a with diaeresis
1147   else
1148     Send "{u+00c4}"  ; (Ä) A with diaeresis
1149 }
1150
1151 >!q:: {
1152   if GetKeyState("CapsLock", "T")
1153     Send "{u+00c6}"  ; (Æ) letter AE
1154   else
1155     Send "{u+00e6}"  ; (æ) letter ae
1156 }
1157 >!+q:: {
1158   if GetKeyState("CapsLock", "T")
1159     Send "{u+00e6}"  ; (æ) letter ae
1160   else
1161     Send "{u+00c6}"  ; (Æ) letter AE
1162 }
1163
1164 >!w:: {
1165   if GetKeyState("CapsLock", "T")
1166     Send "{u+00c5}"  ; (Å) A with ring above
1167   else
1168     Send "{u+00e5}"  ; (å) a with ring above
1169 }
1170 >!+w:: {
1171   if GetKeyState("CapsLock", "T")
1172     Send "{u+00e5}"  ; (å) a with ring above
1173   else
1174     Send "{u+00c5}"  ; (Å) A with ring above
1175 }
1176
1177 >!z:: {
1178   if GetKeyState("CapsLock", "T")
1179     Send "{u+00c0}"  ; (À) A with grave
1180   else
1181     Send "{u+00e0}"  ; (à) a with grave
1182 }
1183 >!+z:: {
1184   if GetKeyState("CapsLock", "T")
1185     Send "{u+00e0}"  ; (à) a with grave
1186   else
1187     Send "{u+00c0}"  ; (À) A with grave
1188 }
1189
1190 >!x:: {
1191   if GetKeyState("CapsLock", "T")
1192     Send "{u+00c1}"  ; (Á) A with acute
1193   else
1194     Send "{u+00e1}"  ; (á) a with acute
1195 }
1196 >!+x:: {
1197   if GetKeyState("CapsLock", "T")
1198     Send "{u+00e1}"  ; (á) a with acute
1199   else
1200     Send "{u+00c1}"  ; (Á) A with acute
1201 }
1202
1203 >!d:: {
1204   if GetKeyState("CapsLock", "T")
1205     Send "{u+00c2}"  ; (Â) A with circumflex
1206   else
1207     Send "{u+00e2}"  ; (â) a with circumflex
1208 }
1209 >!+d:: {
1210   if GetKeyState("CapsLock", "T")
1211     Send "{u+00e2}"  ; (â) a with circumflex
1212   else
1213     Send "{u+00c2}"  ; (Â) A with circumflex
1214 }
1215
1216 >!c:: {
1217   if GetKeyState("CapsLock", "T")
1218     Send "{u+00c7}"  ; (Ç) C with cedilla
1219   else
1220     Send "{u+00e7}"  ; (ç) c with cedilla
1221 }
1222 >!+c:: {
1223   if GetKeyState("CapsLock", "T")
1224     Send "{u+00e7}"  ; (ç) c with cedilla
1225   else
1226     Send "{u+00c7}"  ; (Ç) C with cedilla
1227 }
1228
1229 >!e:: {
1230   if GetKeyState("CapsLock", "T")
1231     Send "{u+00cb}"  ; (Ë) E with diaeresis
1232   else
1233     Send "{u+00eb}"  ; (ë) e with diaeresis
1234 }
1235 >!+e:: {
1236   if GetKeyState("CapsLock", "T")
1237     Send "{u+00eb}"  ; (ë) e with diaeresis
1238   else
1239     Send "{u+00cb}"  ; (Ë) E with diaeresis
1240 }
1241
1242 >!f:: {
1243   if GetKeyState("CapsLock", "T")
1244     Send "{u+00c8}"  ; (È) E with grave
1245   else
1246     Send "{u+00e8}"  ; (è) e with grave
1247 }
1248 >!+f:: {
1249   if GetKeyState("CapsLock", "T")
1250     Send "{u+00e8}"  ; (è) e with grave
1251   else
1252     Send "{u+00c8}"  ; (È) E with grave
1253 }
1254
1255 >!g:: {
1256   if GetKeyState("CapsLock", "T")
1257     Send "{u+00c9}"  ; (É) E with acute
1258   else
1259     Send "{u+00e9}"  ; (é) e with acute
1260 }
1261 >!+g:: {
1262   if GetKeyState("CapsLock", "T")
1263     Send "{u+00e9}"  ; (é) e with acute
1264   else
1265     Send "{u+00c9}"  ; (É) E with acute
1266 }
1267
1268 >!r:: {
1269   if GetKeyState("CapsLock", "T")
1270     Send "{u+00ca}"  ; (Ê) E with circumflex
1271   else
1272     Send "{u+00ea}"  ; (ê) e with circumflex
1273 }
1274 >!+r:: {
1275   if GetKeyState("CapsLock", "T")
1276     Send "{u+00ea}"  ; (ê) e with circumflex
1277   else
1278     Send "{u+00ca}"  ; (Ê) E with circumflex
1279 }
1280
1281 >!i:: {
1282   if GetKeyState("CapsLock", "T")
1283     Send "{u+00cf}"  ; (Ï) I with diaeresis
1284   else
1285     Send "{u+00ef}"  ; (ï) i with diaeresis
1286 }
1287 >!+i:: {
1288   if GetKeyState("CapsLock", "T")
1289     Send "{u+00ef}"  ; (ï) i with diaeresis
1290   else
1291     Send "{u+00cf}"  ; (Ï) I with diaeresis
1292 }
1293
1294 >!v:: {
1295   if GetKeyState("CapsLock", "T")
1296     Send "{u+00cc}"  ; (Ì) I with grave
1297   else
1298     Send "{u+00ec}"  ; (ì) i with grave
1299 }
1300 >!+v:: {
1301   if GetKeyState("CapsLock", "T")
1302     Send "{u+00ec}"  ; (ì) i with grave
1303   else
1304     Send "{u+00cc}"  ; (Ì) I with grave
1305 }
1306
1307 >!b:: {
1308   if GetKeyState("CapsLock", "T")
1309     Send "{u+00cd}"  ; (Í) I with acute
1310   else
1311     Send "{u+00ed}"  ; (í) i with acute
1312 }
1313 >!+b:: {
1314   if GetKeyState("CapsLock", "T")
1315     Send "{u+00ed}"  ; (í) i with acute
1316   else
1317     Send "{u+00cd}"  ; (Í) I with acute
1318 }
1319
1320 >!t:: {
1321   if GetKeyState("CapsLock", "T")
1322     Send "{u+00ce}"  ; (Î) I with circumflex
1323   else
1324     Send "{u+00ee}"  ; (î) i with circumflex
1325 }
1326 >!+t:: {
1327   if GetKeyState("CapsLock", "T")
1328     Send "{u+00ee}"  ; (î) i with circumflex
1329   else
1330     Send "{u+00ce}"  ; (Î) I with circumflex
1331 }
1332
1333 >!n:: {
1334   if GetKeyState("CapsLock", "T")
1335     Send "{u+00d1}"  ; (Ñ) N with tilde
1336   else
1337     Send "{u+00f1}"  ; (ñ) n with tilde
1338 }
1339 >!+n:: {
1340   if GetKeyState("CapsLock", "T")
1341     Send "{u+00f1}"  ; (ñ) n with tilde
1342   else
1343     Send "{u+00d1}"  ; (Ñ) N with tilde
1344 }
1345
1346 >!o:: {
1347   if GetKeyState("CapsLock", "T")
1348     Send "{u+00d6}"  ; (Ö) O with diaeresis
1349   else
1350     Send "{u+00f6}"  ; (ö) o with diaeresis
1351 }
1352 >!+o:: {
1353   if GetKeyState("CapsLock", "T")
1354     Send "{u+00f6}"  ; (ö) o with diaeresis
1355   else
1356     Send "{u+00d6}"  ; (Ö) O with diaeresis
1357 }
1358
1359 >!k:: {
1360   if GetKeyState("CapsLock", "T")
1361     Send "{u+0152}"  ; (Œ) ligature OE
1362   else
1363     Send "{u+0153}"  ; (œ) ligature oe
1364 }
1365 >!+k:: {
1366   if GetKeyState("CapsLock", "T")
1367     Send "{u+0153}"  ; (œ) ligature oe
1368   else
1369     Send "{u+0152}"  ; (Œ) ligature OE
1370 }
1371
1372 >!l:: {
1373   if GetKeyState("CapsLock", "T")
1374     Send "{u+00d8}"  ; (Ø) O with stroke
1375   else
1376     Send "{u+00f8}"  ; (ø) o with stroke
1377 }
1378 >!+l:: {
1379   if GetKeyState("CapsLock", "T")
1380     Send "{u+00f8}"  ; (ø) o with stroke
1381   else
1382     Send "{u+00d8}"  ; (Ø) O with stroke
1383 }
1384
1385 >!,:: {
1386   if GetKeyState("CapsLock", "T")
1387     Send "{u+00d2}"  ; (Ò) O with grave
1388   else
1389     Send "{u+00f2}"  ; (ò) o with grave
1390 }
1391 >!<:: {
1392   if GetKeyState("CapsLock", "T")
1393     Send "{u+00f2}"  ; (ò) o with grave
1394   else
1395     Send "{u+00d2}"  ; (Ò) O with grave
1396 }
1397
1398 >!.:: {
1399   if GetKeyState("CapsLock", "T")
1400     Send "{u+00d3}"  ; (Ó) O with acute
1401   else
1402     Send "{u+00f3}"  ; (ó) o with acute
1403 }
1404 >!>:: {
1405   if GetKeyState("CapsLock", "T")
1406     Send "{u+00f3}"  ; (ó) o with acute
1407   else
1408     Send "{u+00d3}"  ; (Ó) O with acute
1409 }
1410
1411 >!p:: {
1412   if GetKeyState("CapsLock", "T")
1413     Send "{u+00d4}"  ; (Ô) O with circumflex
1414   else
1415     Send "{u+00f4}"  ; (ô) o with circumflex
1416 }
1417 >!+p:: {
1418   if GetKeyState("CapsLock", "T")
1419     Send "{u+00f4}"  ; (ô) o with circumflex
1420   else
1421     Send "{u+00d4}"  ; (Ô) O with circumflex
1422 }
1423
1424 >!s:: {
1425   if GetKeyState("CapsLock", "T")
1426     Send "{u+1e9e}"  ; (ẞ) capital sharp S (capital Eszett)
1427   else
1428     Send "{u+00df}"  ; (ß) small sharp s (Eszett)
1429 }
1430 >!+s:: {
1431   if GetKeyState("CapsLock", "T")
1432     Send "{u+00df}"  ; (ß) small sharp s (Eszett)
1433   else
1434     Send "{u+1e9e}"  ; (ẞ) capital sharp S (capital Eszett)
1435 }
1436
1437 >!u:: {
1438   if GetKeyState("CapsLock", "T")
1439     Send "{u+00dc}"  ; (Ü) U with diaeresis
1440   else
1441     Send "{u+00fc}"  ; (ü) u with diaeresis
1442 }
1443 >!+u:: {
1444   if GetKeyState("CapsLock", "T")
1445     Send "{u+00fc}"  ; (ü) u with diaeresis
1446   else
1447     Send "{u+00dc}"  ; (Ü) U with diaeresis
1448 }
1449
1450 >!h:: {
1451   if GetKeyState("CapsLock", "T")
1452     Send "{u+00d9}"  ; (Ù) U with grave
1453   else
1454     Send "{u+00f9}"  ; (ù) u with grave
1455 }
1456 >!+h:: {
1457   if GetKeyState("CapsLock", "T")
1458     Send "{u+00f9}"  ; (ù) u with grave
1459   else
1460     Send "{u+00d9}"  ; (Ù) U with grave
1461 }
1462
1463 >!j:: {
1464   if GetKeyState("CapsLock", "T")
1465     Send "{u+00da}"  ; (Ú) U with acute
1466   else
1467     Send "{u+00fa}"  ; (ú) u with acute
1468 }
1469 >!+j:: {
1470   if GetKeyState("CapsLock", "T")
1471     Send "{u+00fa}"  ; (ú) u with acute
1472   else
1473     Send "{u+00da}"  ; (Ú) U with acute
1474 }
1475
1476 >!y:: {
1477   if GetKeyState("CapsLock", "T")
1478     Send "{u+00db}"  ; (Û) U with circumflex
1479   else
1480     Send "{u+00fb}"  ; (û) u with circumflex
1481 }
1482 >!+y:: {
1483   if GetKeyState("CapsLock", "T")
1484     Send "{u+00fb}"  ; (û) u with circumflex
1485   else
1486     Send "{u+00db}"  ; (Û) U with circumflex
1487 }
1488
1489 >!6:: {
1490   if GetKeyState("CapsLock", "T")
1491     Send "{u+00c3}"  ; (Ã) A with tilde
1492   else
1493     Send "{u+00e3}"  ; (ã) a with tilde
1494 }
1495 >!+6:: {
1496   if GetKeyState("CapsLock", "T")
1497     Send "{u+00e3}"  ; (ã) a with tilde
1498   else
1499     Send "{u+00c3}"  ; (Ã) A with tilde
1500 }
1501
1502 >!7:: {
1503   if GetKeyState("CapsLock", "T")
1504     Send "{u+00d5}"  ; (Õ) O with tilde
1505   else
1506     Send "{u+00f5}"  ; (õ) o with tilde
1507 }
1508 >!+7:: {
1509   if GetKeyState("CapsLock", "T")
1510     Send "{u+00f5}"  ; (õ) o with tilde
1511   else
1512     Send "{u+00d5}"  ; (Õ) O with tilde
1513 }
1514
1515 >!m::Send "{u+00b5}"   ; (µ) micro sign
1516 >!+m::Send "{u+00b1}"  ; (±) plus-minus sign
1517
1518 >!1::Send "{u+00a1}"   ; (¡) inverted exclamation mark
1519 >!+1::Send "{u+00b9}"  ; (¹) superscript 1
1520
1521 >!2::Send "{u+2264}"   ; (≤) less-than or equal to
1522 >!+2::Send "{u+00b2}"  ; (²) superscript 2
1523
1524 >!3::Send "{u+2265}"   ; (≥) greater-than or equal to
1525 >!+3::Send "{u+00b3}"  ; (³) superscript 3
1526
1527 >!4::Send "{u+00a3}"   ; (£) pound sign
1528 >!+4::Send "{u+00a5}"  ; (¥) yen sign
1529
1530 >!5::Send "{u+20ac}"   ; (€) euro sign
1531 >!+5::Send "{u+00a2}"  ; (¢) cent sign (dollar)
1532
1533 >!8::Send "{u+201e}"   ; („) double low-9 quotation mark
1534 >!+8::Send "{u+00a7}"  ; (§) section sign
1535
1536 >!9::Send "{u+201c}"   ; (“) left double quotation mark
1537 >!+9::Send "{u+2018}"  ; (‘) left single quotation mark
1538
1539 >!0::Send "{u+201d}"   ; (”) right double quotation mark
1540 >!+0::Send "{u+2019}"  ; (’) right single quotation mark
1541
1542 >!-::Send "{u+2013}"   ; (–) en dash
1543 >!_::Send "{u+2014}"   ; (—) em dash
1544
1545 >!=::Send "{u+00d7}"   ; (×) multiplication sign
1546 >!+=::Send "{u+00f7}"  ; (÷) division sign
1547
1548 >![::Send "{u+00ab}"   ; («) left-pointing double angle quotation mark
1549 >!{::Send "{u+2039}"   ; (‹) left-pointing single angle quotation mark
1550
1551 >!]::Send "{u+00bb}"   ; (») right-pointing double angle quotation mark
1552 >!}::Send "{u+203a}"   ; (›) right-pointing single angle quotation mark
1553
1554 >!;::Send "{u+00b0}"   ; (°) degree sign
1555 >!+;::Send "{u+00b7}"  ; (·) middle dot
1556
1557 >!'::Send "{u+2020}"   ; (†) dagger
1558 >!+'::Send "{u+2021}"  ; (‡) double dagger
1559
1560 >!\::Send "{u+2002}"   ;     en space
1561 >!|::Send "{u+2003}"   ;     em space
1562
1563 >!/::Send "{u+00bf}"   ; (¿) inverted question mark
1564 >!?::Send "{u+2026}"   ; (…) horizontal ellipsis
1565
1566 >!space::Send "{u+00a0}"   ; non-breaking space
1567 >!+space::Send "{u+00a0}"  ; non-breaking space
1568
1569
1570 ; Compose Key Selector
1571
1572 >!`::
1573 >!~:: {
1574   ihA := InputHook("L1", gEndKeys)
1575   ihA.Start()
1576   ihA.Wait()
1577
1578   ihB := InputHook("L1", gEndKeys)
1579   ihB.Start()
1580   ihB.Wait()
1581
1582   if (ihA.Input == "c") {
1583     if cmpCircumflex.Has(ihB.Input)
1584       Send cmpCircumflex[ihB.Input]
1585   }
1586   else if (ihA.Input == "v") {
1587     if cmpCaron.Has(ihB.Input)
1588       Send cmpCaron[ihB.Input]
1589   }
1590   else if (ihA.Input == ".") {
1591     if cmpDotAbove.Has(ihB.Input)
1592       Send cmpDotAbove[ihB.Input]
1593   }
1594   else if (ihA.Input == "o") {
1595     if cmpRingAbove.Has(ihB.Input)
1596       Send cmpRingAbove[ihB.Input]
1597   }
1598   else if (ihA.Input == "-") {
1599     if cmpMacronStroke.Has(ihB.Input)
1600       Send cmpMacronStroke[ihB.Input]
1601   }
1602   else if (ihA.Input == "_") {
1603     if cmpMacronStrokeAdd.Has(ihB.Input)
1604       Send cmpMacronStrokeAdd[ihB.Input]
1605   }
1606   else if (ihA.Input == "/") {
1607     if cmpStroke.Has(ihB.Input)
1608       Send cmpStroke[ihB.Input]
1609   }
1610   else if (ihA.Input == ",") {
1611     if cmpCedillaOgonek.Has(ihB.Input)
1612       Send cmpCedillaOgonek[ihB.Input]
1613   }
1614   else if (ihA.Input == "b") {
1615     if cmpBreveSpecial.Has(ihB.Input)
1616       Send cmpBreveSpecial[ihB.Input]
1617   }
1618   else if (ihA.Input == "B") {
1619     if cmpInvertedBreve.Has(ihB.Input)
1620       Send cmpInvertedBreve[ihB.Input]
1621   }
1622   else if (ihA.Input == "'") {
1623     if cmpAcuteAccent.Has(ihB.Input)
1624       Send cmpAcuteAccent[ihB.Input]
1625   }
1626   else if (ihA.Input == chr(34)) {
1627     if cmpDiaeresis.Has(ihB.Input)
1628       Send cmpDiaeresis[ihB.Input]
1629   }
1630   else if (ihA.Input == "=") {
1631     if cmpDoubleAcute.Has(ihB.Input)
1632       Send cmpDoubleAcute[ihB.Input]
1633   }
1634   else if (ihA.Input == "``") {
1635     if cmpGraveAccent.Has(ihB.Input)
1636       Send cmpGraveAccent[ihB.Input]
1637   }
1638   else if (ihA.Input == "G") {
1639     if cmpDoubleGrave.Has(ihB.Input)
1640       Send cmpDoubleGrave[ihB.Input]
1641   }
1642   else if (ihA.Input == "~") {
1643     if cmpTilde.Has(ihB.Input)
1644       Send cmpTilde[ihB.Input]
1645   }
1646   else if (ihA.Input == "h") {
1647     if cmpHook.Has(ihB.Input)
1648       Send cmpHook[ihB.Input]
1649   }
1650   else if (ihA.Input == "l") {
1651     if cmpLatinGreek.Has(ihB.Input)
1652       Send cmpLatinGreek[ihB.Input]
1653   }
1654   else if (ihA.Input == "t") {
1655     if cmpTurned.Has(ihB.Input)
1656       Send cmpTurned[ihB.Input]
1657   }
1658   else if (ihA.Input == "$") {
1659     if cmpCurrency.Has(ihB.Input)
1660       Send cmpCurrency[ihB.Input]
1661   }
1662   else if (ihA.Input == "g") {
1663     if cmpGreek.Has(ihB.Input)
1664       Send cmpGreek[ihB.Input]
1665   }
1666   else if (ihA.Input == "p") {
1667     if cmpSuperscript.Has(ihB.Input)
1668       Send cmpSuperscript[ihB.Input]
1669   }
1670   else if (ihA.Input == "u") {
1671     if cmpSubscript.Has(ihB.Input)
1672       Send cmpSubscript[ihB.Input]
1673   }
1674   else if (ihA.Input == " ") {
1675     if cmpSpace.Has(ihB.Input)
1676       Send cmpSpace[ihB.Input]
1677   }
1678   else if (ihA.Input == "q") {
1679     if cmpQuad.Has(ihB.Input)
1680       Send cmpQuad[ihB.Input]
1681   }
1682   else if (ihA.Input == "a") {
1683     if cmpArrow.Has(ihB.Input)
1684       Send cmpArrow[ihB.Input]
1685   }
1686   else if (ihA.Input == "s") {
1687     if cmpSymbols.Has(ihB.Input)
1688       Send cmpSymbols[ihB.Input]
1689   }
1690   else if (ihA.Input == "f") {
1691     if cmpFlorette.Has(ihB.Input)
1692       Send cmpFlorette[ihB.Input]
1693   }
1694   else if (ihA.Input == "C") {
1695     if cmpCapitalC.Has(ihB.Input)
1696       Send cmpCapitalC[ihB.Input]
1697   }
1698   else if (ihA.Input == "S") {
1699     if cmpCapitalS.Has(ihB.Input)
1700       Send cmpCapitalS[ihB.Input]
1701   }
1702   else if (ihA.Input == "1") {
1703     if cmpOne.Has(ihB.Input)
1704       Send cmpOne[ihB.Input]
1705   }
1706   else if (ihA.Input == "2") {
1707     if cmpTwo.Has(ihB.Input)
1708       Send cmpTwo[ihB.Input]
1709   }
1710   else if (ihA.Input == "3") {
1711     if cmpThree.Has(ihB.Input)
1712       Send cmpThree[ihB.Input]
1713   }
1714   else if (ihA.Input == "4") {
1715     if cmpFour.Has(ihB.Input)
1716       Send cmpFour[ihB.Input]
1717   }
1718   else if (ihA.Input == "5") {
1719     if cmpFive.Has(ihB.Input)
1720       Send cmpFive[ihB.Input]
1721   }
1722   else if (ihA.Input == "7") {
1723     if cmpSeven.Has(ihB.Input)
1724       Send cmpSeven[ihB.Input]
1725   }
1726   else if (ihA.Input == "0") {
1727     if cmpZero.Has(ihB.Input)
1728       Send cmpZero[ihB.Input]
1729   }
1730   else if (ihA.Input == "m") {
1731     if cmpMathSymbols.Has(ihB.Input)
1732       Send cmpMathSymbols[ihB.Input]
1733   }
1734   else if (ihA.Input == "A") {
1735     if cmpCapitalA.Has(ihB.Input)
1736       Send cmpCapitalA[ihB.Input]
1737   }
1738   else if (ihA.Input == "d") {
1739     if cmpSmallD.Has(ihB.Input)
1740       Send cmpSmallD[ihB.Input]
1741   }
1742   else if (ihA.Input == "D") {
1743     if cmpCapitalD.Has(ihB.Input)
1744       Send cmpCapitalD[ihB.Input]
1745   }
1746   else if (ihA.Input == "i") {
1747     if cmpSmallI.Has(ihB.Input)
1748       Send cmpSmallI[ihB.Input]
1749   }
1750   else if (ihA.Input == "I") {
1751     if cmpCapitalI.Has(ihB.Input)
1752       Send cmpCapitalI[ihB.Input]
1753   }
1754   else if (ihA.Input == "O") {
1755     if cmpCapitalO.Has(ihB.Input)
1756       Send cmpCapitalO[ihB.Input]
1757   }
1758   else if (ihA.Input == "T") {
1759     if cmpCapitalT.Has(ihB.Input)
1760       Send cmpCapitalT[ihB.Input]
1761   }
1762   else if (ihA.Input == "n") {
1763     if cmpSmallN.Has(ihB.Input)
1764       Send cmpSmallN[ihB.Input]
1765   }
1766   else if (ihA.Input == "N") {
1767     if cmpCapitalN.Has(ihB.Input)
1768       Send cmpCapitalN[ihB.Input]
1769   }
1770   else if (ihA.Input == "P") {
1771     if cmpCapitalP.Has(ihB.Input)
1772       Send cmpCapitalP[ihB.Input]
1773   }
1774   else if (ihA.Input == "r") {
1775     if cmpSmallR.Has(ihB.Input)
1776       Send cmpSmallR[ihB.Input]
1777   }
1778   else if (ihA.Input == "*") {
1779     if cmpAsterisk.Has(ihB.Input)
1780       Send cmpAsterisk[ihB.Input]
1781   }
1782   else if (ihA.Input == "!") {
1783     if cmpExclam.Has(ihB.Input)
1784       Send cmpExclam[ihB.Input]
1785   }
1786   else if (ihA.Input == "?") {
1787     if cmpQuestion.Has(ihB.Input)
1788       Send cmpQuestion[ihB.Input]
1789   }
1790   else if (ihA.Input == "(") {
1791     if cmpParenLeft.Has(ihB.Input)
1792       Send cmpParenLeft[ihB.Input]
1793   }
1794   else if (ihA.Input == "+") {
1795     if cmpPlus.Has(ihB.Input)
1796       Send cmpPlus[ihB.Input]
1797   }
1798   else if (ihA.Input == "%") {
1799     if cmpPercent.Has(ihB.Input)
1800       Send cmpPercent[ihB.Input]
1801   }
1802   else if (ihA.Input == "8") {
1803     if cmpEight.Has(ihB.Input)
1804       Send cmpEight[ihB.Input]
1805   }
1806   else if (ihA.Input == "<") {
1807     if cmpLessThan.Has(ihB.Input)
1808       Send cmpLessThan[ihB.Input]
1809   }
1810   else if (ihA.Input == ">") {
1811     if cmpGreaterThan.Has(ihB.Input)
1812       Send cmpGreaterThan[ihB.Input]
1813   }
1814   else if (ihA.Input == "[") {
1815     if cmpBracketLeft.Has(ihB.Input)
1816       Send cmpBracketLeft[ihB.Input]
1817   }
1818   else if (ihA.Input == ";") {
1819     if cmpSemicolon.Has(ihB.Input)
1820       Send cmpSemicolon[ihB.Input]
1821   }
1822   else if (ihA.Input == "]") {
1823     if cmpBracketRight.Has(ihB.Input)
1824       Send cmpBracketRight[ihB.Input]
1825   }
1826   else if (ihA.Input == "e") {
1827     if cmpSmallE.Has(ihB.Input)
1828       Send cmpSmallE[ihB.Input]
1829   }
1830   else if (ihA.Input == "E") {
1831     if cmpCapitalE.Has(ihB.Input)
1832       Send cmpCapitalE[ihB.Input]
1833   }
1834   else if (ihA.Input == "V") {
1835     if cmpCapitalV.Has(ihB.Input)
1836       Send cmpCapitalV[ihB.Input]
1837   }
1838 }